/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/File/t/ |
H A D | 01_gen.t | 21 check_contents("rec0"); 25 check_contents("rec0", "rec1"); 27 check_contents("rec0", "rec1", "rec2"); 31 check_contents("new0", "rec1", "rec2"); 33 check_contents("new0", "new1", "rec2"); 35 check_contents("new0", "new1", "new2"); 39 check_contents("long0", "new1", "new2"); 41 check_contents("long0", "long1", "new2"); 43 check_contents("long0", "long1", "long2"); 45 check_contents("long 117 sub check_contents { subroutine [all...] |
H A D | 06_fixrec.t | 18 check_contents("rec0$:"); 20 check_contents("rec0$:rec1$:"); 22 check_contents("rec0$:rec1$:rec2$:$:"); 24 sub check_contents { subroutine
|
H A D | 13_size_rs.t | 47 check_contents("${data}blahblah"); 51 check_contents("${data}blahblahblahblah"); 55 check_contents("${data}blahblah"); 59 check_contents($data); 63 check_contents(''); 66 sub check_contents { subroutine
|
H A D | 15_pushpop.t | 5 # Each call to 'check_contents' actually performs two tests. 33 check_contents($data); 38 check_contents("$ {data}rec3$:rec4$:"); 44 check_contents("$ {data}rec3$:rec4$:"); 50 check_contents("$ {data}rec3$:"); 57 check_contents(""); 62 check_contents(""); 69 check_contents($data); 74 check_contents("rec3$:rec4$:$data"); 80 check_contents("rec 103 sub check_contents { subroutine [all...] |
H A D | 16_handle.t | 31 check_contents("rec0"); 35 check_contents("rec0", "rec1"); 37 check_contents("rec0", "rec1", "rec2"); 41 check_contents("new0", "rec1", "rec2"); 43 check_contents("new0", "new1", "rec2"); 45 check_contents("new0", "new1", "new2"); 49 check_contents("long0", "new1", "new2"); 51 check_contents("long0", "long1", "new2"); 53 check_contents("long0", "long1", "long2"); 55 check_contents("long 115 sub check_contents { subroutine [all...] |
H A D | 18_rs_fixrec.t | 18 check_contents("rec0blah"); 20 check_contents("rec0blahrec1blah"); 22 check_contents("rec0blahrec1blahrec2blahblah"); 24 sub check_contents { subroutine
|
H A D | 25_gen_nocache.t | 22 check_contents("rec0"); 26 check_contents("rec0", "rec1"); 28 check_contents("rec0", "rec1", "rec2"); 32 check_contents("new0", "rec1", "rec2"); 34 check_contents("new0", "new1", "rec2"); 36 check_contents("new0", "new1", "new2"); 40 check_contents("long0", "new1", "new2"); 42 check_contents("long0", "long1", "new2"); 44 check_contents("long0", "long1", "long2"); 46 check_contents("long 89 sub check_contents { subroutine [all...] |
H A D | 33_defer_vs.t | 35 check_contents($data); # nothing written yet 37 check_contents($data); # nothing written yet 41 check_contents($data . "333$:4444$:"); # now it's written 45 check_contents("${data}999999999$:4444$:"); 47 check_contents("${data}999999999$:88888888$:"); 53 check_contents($data); # nothing written yet 55 check_contents($data); # nothing written yet 57 check_contents("55555$:1$:aaaaaaaaaa$:"); 62 check_contents("55555$:1$:aaaaaaaaaa$:"); 64 check_contents("5555 91 sub check_contents { subroutine [all...] |
H A D | 04_splice.t | 7 # Each call to 'check_contents' actually performs two tests. 36 check_contents("rec4$:$data"); 38 check_contents("rec5$:$data"); 40 check_contents("record5$:$data"); 43 check_contents("r5$:$data"); 45 check_contents("$data"); 47 check_contents("$data"); 49 check_contents("r7$:rec8$:$data"); 51 check_contents("rec7$:record8$:rec9$:$data"); 54 check_contents("record 232 sub check_contents { subroutine [all...] |
H A D | 05_size.t | 55 check_contents("$data$:$:"); 60 check_contents("$data$:$:$:$:"); 65 check_contents("$data$:$:"); 70 check_contents($data); 75 check_contents(''); 97 sub check_contents { subroutine
|
H A D | 09_gen_rs.t | 20 check_contents("rec0"); 24 check_contents("rec0", "rec1"); 26 check_contents("rec0", "rec1", "rec2"); 30 check_contents("new0", "rec1", "rec2"); 32 check_contents("new0", "new1", "rec2"); 34 check_contents("new0", "new1", "new2"); 38 check_contents("long0", "new1", "new2"); 40 check_contents("long0", "long1", "new2"); 42 check_contents("long0", "long1", "long2"); 44 check_contents("long 178 sub check_contents { subroutine [all...] |
H A D | 10_splice_rs.t | 6 # Each call to 'check_contents' actually performs two tests. 34 check_contents("rec4blah$data"); 36 check_contents("rec5blah$data"); 38 check_contents("record5blah$data"); 41 check_contents("r5blah$data"); 43 check_contents("$data"); 45 check_contents("$data"); 47 check_contents("r7blahrec8blah$data"); 49 check_contents("rec7blahrecord8blahrec9blah$data"); 52 check_contents("record9blahrec10bla 184 sub check_contents { subroutine [all...] |
H A D | 17_misc_meth.t | 23 check_contents("$:$:$:"); 25 check_contents("$:$:$:$:"); 27 check_contents("$:$:$:$:"); 31 check_contents(""); 73 check_contents("$:$:GIVE ME PIE$:"); 77 check_contents("$:$:"); 80 check_contents("$:$:"); 83 check_contents("$:"); 89 check_contents("$:"); 103 sub check_contents { subroutine [all...] |
H A D | 22_autochomp.t | 18 check_contents("rec0"); 22 check_contents("rec0", "rec1"); 24 check_contents("rec0", "rec1", "rec2"); 28 check_contents("new0", "rec1", "rec2"); 30 check_contents("new0", "new1", "rec2"); 32 check_contents("new0", "new1", "new2"); 36 check_contents("long0", "new1", "new2"); 38 check_contents("long0", "long1", "new2"); 40 check_contents("long0", "long1", "long2"); 42 check_contents("long 103 sub check_contents { subroutine [all...] |
H A D | 26_twrite.t | 311 sub check_contents { subroutine
|
H A D | 29_downcopy.t | 316 sub check_contents { subroutine
|
H A D | 29a_upcopy.t | 163 sub check_contents { subroutine
|
H A D | 30_defer.t | 33 check_contents($data); # nothing written yet 35 check_contents($data); # nothing written yet 39 check_contents($data . "rec3$:rec4$:"); # now it's written 43 check_contents("${data}rec9$:rec4$:"); 45 check_contents("${data}rec9$:rec8$:"); 51 check_contents($data); # nothing written yet 53 check_contents($data); # nothing written yet 55 check_contents("record0$:rec1$:record2$:"); 60 check_contents("record0$:rec1$:record2$:"); 62 check_contents("record 294 sub check_contents { subroutine [all...] |
H A D | 31_autodefer.t | 41 check_contents($data . "rec3$:rec4$:"); # only the first two were written 44 check_contents($data . "rec3$:rec4$:"); # still nothing written 47 check_contents($data . "rec3$:rec4$:"); # still nothing written 50 check_contents("recX$:rec1$:rec2$:rec3$:rec4$:rec5$:rec6$:rec7$:"); 53 check_contents("recX$:recY$:rec2$:rec3$:rec4$:rec5$:rec6$:rec7$:"); 56 check_contents("recX$:recY$:rec2$:rec3$:rec4$:rec5$:rec6$:rec7$:"); 61 check_contents("recX$:recY$:recZ$:rec3$:rec4$:rec5$:rec6$:rec7$:"); 69 check_contents("$:$:$:$:$:"); 72 check_contents("r0$:r1$:fish$:r3$:r4$:"); 80 check_contents("##r 147 sub check_contents { subroutine [all...] |
H A D | 32_defer_misc.t | 35 check_contents($data); # nothing written yet 50 check_contents($data); # nothing written yet 56 check_contents($data); # nothing written yet 60 check_contents("$data$:$:"); # two extra empty records 66 check_contents($data); # written data was unwritten 68 check_contents($data); # nothing left to write 73 check_contents($data); # nothing written yet 75 check_contents(""); # this happens right away 78 check_contents(""); # nothing left to write 85 check_contents(""); # nothin 174 sub check_contents { subroutine [all...] |