/dports/lang/perl5.34/perl-5.34.0/t/comp/ |
H A D | proto.t | 83 print "not " unless 0 == no_args; 96 print "not " unless $@; 123 print "not " unless $@; 127 print "not " unless $@; 168 print "not " unless $@; 212 print "not " unless $@; 256 print "not " unless $@; 260 print "not " unless $@; 293 print "not " unless $@; 327 print "not " unless $@; [all …]
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/t/comp/ |
H A D | proto.t | 83 print "not " unless 0 == no_args; 96 print "not " unless $@; 123 print "not " unless $@; 127 print "not " unless $@; 168 print "not " unless $@; 212 print "not " unless $@; 256 print "not " unless $@; 260 print "not " unless $@; 293 print "not " unless $@; 327 print "not " unless $@; [all …]
|
/dports/lang/perl5.30/perl-5.30.3/t/comp/ |
H A D | proto.t | 83 print "not " unless 0 == no_args; 96 print "not " unless $@; 123 print "not " unless $@; 127 print "not " unless $@; 168 print "not " unless $@; 212 print "not " unless $@; 256 print "not " unless $@; 260 print "not " unless $@; 293 print "not " unless $@; 327 print "not " unless $@; [all …]
|
/dports/lang/perl5.32/perl-5.32.1/t/comp/ |
H A D | proto.t | 83 print "not " unless 0 == no_args; 96 print "not " unless $@; 123 print "not " unless $@; 127 print "not " unless $@; 168 print "not " unless $@; 212 print "not " unless $@; 256 print "not " unless $@; 260 print "not " unless $@; 293 print "not " unless $@; 327 print "not " unless $@; [all …]
|
/dports/lang/perl5.34/perl-5.34.0/t/lib/ |
H A D | h2ph.pht | 5 unless(defined(&SQUARE)) { 11 unless(defined(&ERROR)) { 15 }' unless defined(&ERROR); 17 unless(defined(&_H2PH_H_)) { 24 }' unless defined(&MAX); 31 }' unless defined(&MIN); 63 eval("sub sun () { 0; }") unless defined(&sun); 64 eval("sub mon () { 1; }") unless defined(&mon); 65 eval("sub tue () { 2; }") unless defined(&tue); 77 unless(defined(&_SOMETHING_TRIGRAPHIC)) { [all …]
|
/dports/lang/perl5.30/perl-5.30.3/t/lib/ |
H A D | h2ph.pht | 5 unless(defined(&SQUARE)) { 11 unless(defined(&ERROR)) { 15 }' unless defined(&ERROR); 17 unless(defined(&_H2PH_H_)) { 24 }' unless defined(&MAX); 31 }' unless defined(&MIN); 63 eval("sub sun () { 0; }") unless defined(&sun); 64 eval("sub mon () { 1; }") unless defined(&mon); 65 eval("sub tue () { 2; }") unless defined(&tue); 77 unless(defined(&_SOMETHING_TRIGRAPHIC)) { [all …]
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/t/lib/ |
H A D | h2ph.pht | 5 unless(defined(&SQUARE)) { 11 unless(defined(&ERROR)) { 15 }' unless defined(&ERROR); 17 unless(defined(&_H2PH_H_)) { 24 }' unless defined(&MAX); 31 }' unless defined(&MIN); 63 eval("sub sun () { 0; }") unless defined(&sun); 64 eval("sub mon () { 1; }") unless defined(&mon); 65 eval("sub tue () { 2; }") unless defined(&tue); 77 unless(defined(&_SOMETHING_TRIGRAPHIC)) { [all …]
|
/dports/lang/perl5.32/perl-5.32.1/t/lib/ |
H A D | h2ph.pht | 5 unless(defined(&SQUARE)) { 11 unless(defined(&ERROR)) { 15 }' unless defined(&ERROR); 17 unless(defined(&_H2PH_H_)) { 24 }' unless defined(&MAX); 31 }' unless defined(&MIN); 63 eval("sub sun () { 0; }") unless defined(&sun); 64 eval("sub mon () { 1; }") unless defined(&mon); 65 eval("sub tue () { 2; }") unless defined(&tue); 77 unless(defined(&_SOMETHING_TRIGRAPHIC)) { [all …]
|
/dports/databases/p5-GDBM/perl-5.14.2/t/lib/ |
H A D | h2ph.pht | 5 unless(defined(&SQUARE)) { 11 unless(defined(&ERROR)) { 15 }' unless defined(&ERROR); 17 unless(defined(&_H2PH_H_)) { 24 }' unless defined(&MAX); 31 }' unless defined(&MIN); 63 eval("sub sun () { 0; }") unless defined(&sun); 64 eval("sub mon () { 1; }") unless defined(&mon); 65 eval("sub tue () { 2; }") unless defined(&tue); 77 unless(defined(&_SOMETHING_TRIGRAPHIC)) { [all …]
|
/dports/devel/p5-Time-Object/Time-Object-1.00/t/ |
H A D | core.t | 9 print "not " unless $t->sec == 56; 12 print "not " unless $t->second == 56; 15 print "not " unless $t->min == 34; 18 #print "not " unless $t->minute == 34; 21 print "not " unless $t->hour == 12; 24 print "not " unless $t->mday == 29; 30 print "not " unless $t->mon == 2; 33 print "not " unless $t->_mon == 1; 48 print "not " unless $t->wday == 3; 51 print "not " unless $t->_wday == 2; [all …]
|
/dports/devel/p5-Set-Scalar/Set-Scalar-1.29/t/ |
H A D | basic.t | 9 print "not " unless $s->size == 0; 12 print "not " unless $s->is_null; 15 print "not " unless $s->is_universal; 18 print "not " unless $s eq "()"; 26 print "not " unless $s->size == 1; 35 print "not " unless $s eq "(a)"; 43 print "not " unless $s->size == 1; 52 print "not " unless $s eq "(a)"; 60 print "not " unless $s->size == 5; 131 print "not " unless $s->is_null; [all …]
|
H A D | basic_overload.t | 9 print "not " unless $s->size == 0; 12 print "not " unless $s->is_null; 15 print "not " unless $s->is_universal; 18 print "not " unless $s eq "()"; 26 print "not " unless $s->size == 1; 32 print "not " unless $s->is_universal; 35 print "not " unless $s eq "(a)"; 43 print "not " unless $s->size == 1; 52 print "not " unless $s eq "(a)"; 63 print "not " unless $s->size == 5; [all …]
|
H A D | intersection.t | 10 print "not " unless $d eq "(c d e)"; 13 print "not " unless $a eq "(a b c d e)"; 16 print "not " unless $b eq "(c d e f g)"; 21 print "not " unless $e eq "(c d e)"; 24 print "not " unless $a eq "(a b c d e)"; 32 print "not " unless $f eq "(c d e)"; 43 print "not " unless $g eq "(c d e)"; 54 print "not " unless $h eq "()"; 62 print "not " unless $i eq "()"; 70 print "not " unless $j eq "(c)"; [all …]
|
/dports/net/p5-URI/URI-5.10/t/ |
H A D | generic.t | 10 print "not " unless ref($foo) eq "URI::_foreign"; 13 print "not " unless $foo->as_string eq "Foo:opaque#frag"; 16 print "not " unless "$foo" eq "Foo:opaque#frag"; 23 print "not " unless $foo->opaque eq "opaque"; 26 print "not " unless $foo->fragment eq "frag"; 81 print "not " unless $foo->eq("Foo:opaque") && 99 print "not " unless $foo->scheme eq "foo"; 105 print "not " unless $foo->path eq "/path"; 108 print "not " unless $foo->query eq "query"; 111 print "not " unless $foo->fragment eq "frag"; [all …]
|
/dports/lang/perl5.34/perl-5.34.0/lib/User/ |
H A D | pwent.t | 11 $haspw = 1 unless $@ && $@ =~ /unimplemented/; 39 print "not " unless ( $pwent->uid == $uid_expect 43 print "not " unless $pwent->uid == $uid_expect ; 47 print "not " unless $pwent->name eq $pwent[0]; 52 unless not defined $pwent->passwd && 55 print "not " unless $pwent->passwd eq $pwent[1]; 59 print "not " unless $pwent->uid == $pwent[2]; 62 print "not " unless $pwent->gid == $pwent[3]; 67 print "not " unless $pwent->gecos eq $pwent[6]; 70 print "not " unless $pwent->dir eq $pwent[7]; [all …]
|
/dports/lang/perl5.30/perl-5.30.3/lib/User/ |
H A D | pwent.t | 11 $haspw = 1 unless $@ && $@ =~ /unimplemented/; 39 print "not " unless ( $pwent->uid == $uid_expect 43 print "not " unless $pwent->uid == $uid_expect ; 47 print "not " unless $pwent->name eq $pwent[0]; 52 unless not defined $pwent->passwd && 55 print "not " unless $pwent->passwd eq $pwent[1]; 59 print "not " unless $pwent->uid == $pwent[2]; 62 print "not " unless $pwent->gid == $pwent[3]; 67 print "not " unless $pwent->gecos eq $pwent[6]; 70 print "not " unless $pwent->dir eq $pwent[7]; [all …]
|
/dports/lang/perl5.32/perl-5.32.1/lib/User/ |
H A D | pwent.t | 11 $haspw = 1 unless $@ && $@ =~ /unimplemented/; 39 print "not " unless ( $pwent->uid == $uid_expect 43 print "not " unless $pwent->uid == $uid_expect ; 47 print "not " unless $pwent->name eq $pwent[0]; 52 unless not defined $pwent->passwd && 55 print "not " unless $pwent->passwd eq $pwent[1]; 59 print "not " unless $pwent->uid == $pwent[2]; 62 print "not " unless $pwent->gid == $pwent[3]; 67 print "not " unless $pwent->gecos eq $pwent[6]; 70 print "not " unless $pwent->dir eq $pwent[7]; [all …]
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/lib/User/ |
H A D | pwent.t | 11 $haspw = 1 unless $@ && $@ =~ /unimplemented/; 39 print "not " unless ( $pwent->uid == $uid_expect 43 print "not " unless $pwent->uid == $uid_expect ; 47 print "not " unless $pwent->name eq $pwent[0]; 52 unless not defined $pwent->passwd && 55 print "not " unless $pwent->passwd eq $pwent[1]; 59 print "not " unless $pwent->uid == $pwent[2]; 62 print "not " unless $pwent->gid == $pwent[3]; 67 print "not " unless $pwent->gecos eq $pwent[6]; 70 print "not " unless $pwent->dir eq $pwent[7]; [all …]
|
/dports/lang/perl5.34/perl-5.34.0/t/base/ |
H A D | lex.t | 355 print "not " unless /foo/; 366 print 'not ' unless $_ eq "b\0"; 375 print "not " unless $@; 384 print "not " unless $@; 454 print "not " unless $_ eq 'b'; 461 print "not " unless $_ eq 'b'; 468 print "not " unless $_ eq 'b'; 471 print "not " unless (time 480 print "not " unless 495 print "not "unless $_ == 42; [all …]
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/t/base/ |
H A D | lex.t | 355 print "not " unless /foo/; 366 print 'not ' unless $_ eq "b\0"; 375 print "not " unless $@; 384 print "not " unless $@; 454 print "not " unless $_ eq 'b'; 461 print "not " unless $_ eq 'b'; 468 print "not " unless $_ eq 'b'; 471 print "not " unless (time 480 print "not " unless 495 print "not "unless $_ == 42; [all …]
|
/dports/lang/perl5.30/perl-5.30.3/t/base/ |
H A D | lex.t | 355 print "not " unless /foo/; 366 print 'not ' unless $_ eq "b\0"; 375 print "not " unless $@; 384 print "not " unless $@; 454 print "not " unless $_ eq 'b'; 461 print "not " unless $_ eq 'b'; 468 print "not " unless $_ eq 'b'; 471 print "not " unless (time 480 print "not " unless 495 print "not "unless $_ == 42; [all …]
|
/dports/lang/perl5.32/perl-5.32.1/t/base/ |
H A D | lex.t | 355 print "not " unless /foo/; 366 print 'not ' unless $_ eq "b\0"; 375 print "not " unless $@; 384 print "not " unless $@; 454 print "not " unless $_ eq 'b'; 461 print "not " unless $_ eq 'b'; 468 print "not " unless $_ eq 'b'; 471 print "not " unless (time 480 print "not " unless 495 print "not "unless $_ == 42; [all …]
|
/dports/lang/perl5.34/perl-5.34.0/t/op/ |
H A D | length.t | 11 print "not " unless length("") == 0; 14 print "not " unless length("abc") == 3; 18 print "not " unless length() == 6; 26 print "not " unless length($a) == 1; 31 print "not " unless $a eq "\x41" && length($a) == 1; 39 print "not " unless length($a) == 1; 60 print "not " unless length($a) == 1; 81 print "not " unless length($a) == 2; 102 print "not " unless length($a) == 2; 128 print "not " unless length($a) == 1; [all …]
|
/dports/lang/perl5.30/perl-5.30.3/t/op/ |
H A D | length.t | 11 print "not " unless length("") == 0; 14 print "not " unless length("abc") == 3; 18 print "not " unless length() == 6; 26 print "not " unless length($a) == 1; 31 print "not " unless $a eq "\x41" && length($a) == 1; 39 print "not " unless length($a) == 1; 60 print "not " unless length($a) == 1; 81 print "not " unless length($a) == 2; 102 print "not " unless length($a) == 2; 128 print "not " unless length($a) == 1; [all …]
|
/dports/lang/perl5.32/perl-5.32.1/t/op/ |
H A D | length.t | 11 print "not " unless length("") == 0; 14 print "not " unless length("abc") == 3; 18 print "not " unless length() == 6; 26 print "not " unless length($a) == 1; 31 print "not " unless $a eq "\x41" && length($a) == 1; 39 print "not " unless length($a) == 1; 60 print "not " unless length($a) == 1; 81 print "not " unless length($a) == 2; 102 print "not " unless length($a) == 2; 128 print "not " unless length($a) == 1; [all …]
|