Searched defs:xyz (Results 1 - 2 of 2) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/base/
H A Dlex.t252 sub xyz::foo { "bar" } subroutine
255 xyz::foo => 1,
256 xyz::bar => 1,
262 print ((exists $str{xyz::bar} ? "" : "not ")."ok $test\n"); ++$test;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/comp/
H A Dpackage.t8 package xyz; package
20 $xyz = 2;
23 $xyz = join(':', sort(keys %xyz::));
27 print $xyz eq 'bar:main:xyz:ABC' ? "ok 1\n" : "not ok 1 '$xyz'\n";
29 print $xyz eq 'ABC:bar:main:xyz' ? "ok 1\n" : "not ok 1 '$xyz'\
[all...]

Completed in 27 milliseconds