Searched refs:TieAll (Results 1 - 1 of 1) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/comp/ |
| H A D | our.t | 12 package TieAll; package
16 for ($AUTOLOAD =~ /TieAll::(.*)/) {
30 tie $x, 'TieAll';
31 tie @x, 'TieAll';
32 tie %x, 'TieAll';
35 is(TieAll->calls, '', 'our $x has no runtime effect');
38 is(TieAll->calls, '', 'our ($x) has no runtime effect');
41 is(TieAll->calls, '', 'our %x has no runtime effect');
44 is(TieAll->calls, '', 'our (%x) has no runtime effect');
47 is(TieAll
[all...] |
Completed in 24 milliseconds