Searched refs:autochomp (Results 1 - 14 of 14) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/File/t/ |
| H A D | 09_gen_rs.t | 13 recsep => $RECSEP, autochomp => 0, autodefer => 0;
80 recsep => $RECSEP, autochomp => 0, autodefer => 0;
99 recsep => $RECSEP, autochomp => 0, autodefer => 0
111 recsep => $RECSEP, autochomp => 0, autodefer => 0
119 recsep => $RECSEP, autochomp => 0, autodefer => 0
135 recsep => $RECSEP, autochomp => 0, autodefer => 0
|
| 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 | 22_autochomp.t | 12 my $o = tie @a, 'Tie::File', $file, autochomp => 1, autodefer => 0;
72 # (63-68) Test the ->autochomp() method
75 $ac = $o->autochomp();
78 $ac = $o->autochomp();
81 $ac = $o->autochomp(0);
85 $ac = $o->autochomp(1);
89 # (69) Does 'splice' work correctly with autochomp?
|
| H A D | 02_fetchsize.t | 19 my $o = tie @a, 'Tie::File', $file, autochomp => 0;
|
| H A D | 08_ro.t | 19 my $o = tie @a, 'Tie::File', $file, mode => O_RDONLY, autochomp => 0;
48 my $o = tie @a, 'Tie::File', $file, mode => O_RDONLY, autochomp => 0
|
| H A D | 25_gen_nocache.t | 14 my $o = tie @a, 'Tie::File', $file, autochomp => 0, autodefer => 0, memory => 0;
|
| H A D | 01_gen.t | 13 my $o = tie @a, 'Tie::File', $file, autochomp => 0, autodefer => 0;
|
| H A D | 15_pushpop.t | 25 my $o = tie @a, 'Tie::File', $file, autochomp => 0;
|
| H A D | 16_handle.t | 25 my $o = tie @a, 'Tie::File', \*F, autochomp => 0, autodefer => 0;
|
| H A D | 07_rv_splice.t | 20 my $o = tie @a, 'Tie::File', $file, autochomp => 0;
|
| H A D | 11_rv_splice_rs.t | 18 my $o = tie @a, 'Tie::File', $file, autochomp => 0, recsep => 'blah';
|
| H A D | 23_rv_ac_splice.t | 19 my $o = tie @a, 'Tie::File', $file, autochomp => 1;
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/ |
| H A D | File.pm | 17 autodefer autochomp autodefer_threshhold concurrent);
80 $opts{autochomp} = 1 unless defined $opts{autochomp};
133 if defined $rec && $self->{autochomp};
140 return unless $self->{autochomp};
141 if ($self->{autochomp}) {
152 return $rec unless $self->{autochomp};
1030 # Get/set autochomp option
1031 sub autochomp { subroutine
1034 my $old = $self->{autochomp};
[all...] |
Completed in 31 milliseconds