File: as_string_without_sort.t

package info (click to toggle)
libhttp-headers-fast-perl 0.22-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 176 kB
  • sloc: perl: 1,036; makefile: 2
file content (7 lines) | stat: -rw-r--r-- 220 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
 
use strict;
use Test::More tests => 1;
require HTTP::Headers::Fast;

my $h = HTTP::Headers::Fast->new(foo => "bar", foo => "baaaaz", Foo => "baz");
ok($h->as_string_without_sort(), "Foo: bar\nFoo: baaaaz\nFoo: baz\n");