Lines Matching full:two
11 is_deeply( [ pairgrep { $b % 2 } one => 1, two => 2, three => 3 ],
15 is( scalar( pairgrep { $b & 2 } one => 1, two => 2, three => 3 ),
28 pairgrep { } one => 1, two => 2;
31 pairgrep { } one => 1, two =>;
37 my @kvlist = ( one => 1, two => 2 );
39 is_deeply( \@kvlist, [ one => 2, two => 3 ], 'pairgrep aliases elements' );
42 is_deeply( [ pairfirst { length $a == 5 } one => 1, two => 2, three => 3 ],
46 is_deeply( [ pairfirst { length $a == 4 } one => 1, two => 2, three => 3 ],
50 is( scalar( pairfirst { length $a == 5 } one => 1, two => 2, three => 3 ),
54 ok( !scalar( pairfirst { length $a == 4 } one => 1, two => 2, three => 3 ),
57 is_deeply( [ pairmap { uc $a => $b } one => 1, two => 2, three => 3 ],
58 [ ONE => 1, TWO => 2, THREE => 3 ],
61 is( scalar( pairmap { qw( a b c ) } one => 1, two => 2 ),
65 is_deeply( [ pairmap { $a => @$b } one => [1,1,1], two => [2,2,2], three => [3,3,3] ],
66 [ one => 1, 1, 1, two => 2, 2, 2, three => 3, 3, 3 ],
69 is_deeply( [ pairmap { $b } one => 1, two => 2, three => ],
74 my @kvlist = ( one => 1, two => 2 );
76 is_deeply( \@kvlist, [ one => 2, two => 3 ], 'pairmap aliases elements' );
81 is_deeply( [ pairmap { my @l = (1) x 1000; "$a=$b" } one => 1, two => 2, three => 3 ],
82 [ "one=1", "two=2", "three=3" ],
86 # do the pairmap and is_deeply as two separate statements to avoid
95 is_deeply( [ pairs one => 1, two => 2, three => 3 ],
96 [ [ one => 1 ], [ two => 2 ], [ three => 3 ] ],
99 is_deeply( [ pairs one => 1, two => ],
100 [ [ one => 1 ], [ two => undef ] ],
104 my @p = pairs one => 1, two => 2;
125 is_deeply( [ pairkeys one => 1, two => 2 ],
126 [qw( one two )],
129 is_deeply( [ pairvalues one => 1, two => 2 ],