| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
| H A D | assignwarn.t | 22 sub tiex { tie $_[0], 'main' }
31 for my $tie ("", ", tied") {
33 { my $x; tiex $x if $tie; $x ++; ok ! uninitialized, "postinc$tie"; }
34 { my $x; tiex $x if $tie; $x --; ok ! uninitialized, "postdec$tie"; }
35 { my $x; tiex $x if $tie; ++ $x; ok ! uninitialized, "preinc$tie"; }
36 { my $x; tiex $x if $tie; -- $x; ok ! uninitialized, "predec$tie"; }
[all...] |
| H A D | tie.t | 41 tie %h, Tie::StdHash;
55 tie %h, Tie::HashUntie;
63 $a = tie %h, Tie::StdHash;
70 tie %h, Tie::StdHash;
78 $a = tie %h, Tie::StdHash;
86 tie %h, Tie::StdHash;
96 tie %h, Tie::StdHash;
104 $a = tie %h, Tie::StdHash;
113 tie %h, Tie::StdHash;
123 $a = tie
[all...] |
| H A D | avhv.t | 60 tie @fake, 'Tie::StdArray';
68 tie @fake, 'Tie::BasicArray';
77 tie %fake, 'Tie::StdHash';
|
| H A D | undef.t | 69 tie my %foo, 'Tie::StdHash';
77 tie my @foo, 'Tie::StdArray';
|
| H A D | runlevel.t | 81 tie $bar, TEST;
102 tie $bar, TEST;
125 tie *FH, TEST;
230 tie $bar, TEST;
251 tie $bar, TEST;
280 tie $bar, TEST;
291 tie $bar, TEST;
344 tie my @bar, 'TEST';
352 tie %h, TH;
381 tie *STDER
[all...] |
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/Array/ |
| H A D | std.t | 10 tie @foo,Tie::StdArray;
11 tie @ary,Tie::StdArray;
12 tie @bar,Tie::StdArray;
|
| H A D | push.t | 21 tie @x,Basic;
22 tie @get,Basic;
23 tie @got,Basic;
24 tie @tests,Basic;
|
| H A D | splice.t | 13 tie @a,Tie::StdArray;
|
| H A D | stdpush.t | 10 tie @x,Tie::StdArray;
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Simple/t/ |
| H A D | filehandles.t | 12 tie *STDOUT, "Dev::Null" or die $!;
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/t/comp/ |
| H A D | our.t | 13 # tie, track, and report what calls are made
30 tie $x, 'TieAll';
31 tie @x, 'TieAll';
32 tie %x, 'TieAll';
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/ |
| H A D | tied_items.t | 40 tie %h, "H";
55 tie @a, "A";
|
| H A D | tied.t | 130 $c = tie %hash, TIED_HASH;
131 $d = tie @array, TIED_ARRAY;
132 tie $scalar, TIED_SCALAR;
199 tie $h->{'x'}, 'FAULT', $h, 'x';
217 tie $a, P; my $r = thaw freeze \$a; $b = $$r;
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Harness/t/ |
| H A D | inc_taint.t | 19 tie *NULL, 'Dev::Null' or die $!;
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/File/t/ |
| H A D | 09_gen_rs.t | 12 my $o = tie @a, 'Tie::File', $file,
79 $o = tie @a, 'Tie::File', $file,
98 $o = tie @a, 'Tie::File', $file,
100 or die "Couldn't tie file: $!";
110 $o = tie @a, 'Tie::File', $file,
112 or die "Couldn't tie file: $!";
118 $o = tie @a, 'Tie::File', $file,
120 or die "Couldn't tie file: $!";
134 $o = tie @a, 'Tie::File', $file,
136 or die "Couldn't tie fil
[all...] |
| H A D | 03_longfetch.t | 27 my $o = tie @a, 'Tie::File', $file, autochomp => 0;
|
| H A D | 12_longfetch_rs.t | 24 my $o = tie @a, 'Tie::File', $file, autochomp => 0, recsep => 'blah';
|
| H A D | 13_size_rs.t | 22 $o = tie @a, 'Tie::File', $file, recsep => 'blah';
37 $o = tie @a, 'Tie::File', $file, recsep => 'blah';
|
| H A D | 14_lock.t | 34 $o = tie @a, 'Tie::File', $file, recsep => 'blah';
|
| H A D | 24_cache_loop.t | 30 my $o = tie @a, 'Tie::File', $file, memory => $MAX, autodefer => 1;
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/t/ |
| H A D | VERSION_FROM.t | 33 my $stdout = tie *STDOUT, 'TieOut' or die;
|
| H A D | prompt.t | 31 my $stdout = tie *STDOUT, 'TieOut' or die;
50 my $stdin = tie *STDIN, 'TieIn' or die;
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/Handle/ |
| H A D | stdhandle.t | 9 tie *tst,Tie::StdHandle;
|
| /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/List/Util/t/ |
| H A D | refaddr.t | 22 tie *F, 'MyTie';
|
| H A D | reftype.t | 22 tie *F, 'MyTie';
|