Skip to content

Commit 276e0c0

Browse files
committed
Remove trailing whitespace
1 parent db4efab commit 276e0c0

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

S16-filehandles/io.t

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -126,7 +126,7 @@ is(@lines7[3], "... Its not over yet!", '$in.lines worked in list context');
126126
ok($in7.close, 'file closed okay (7)');
127127

128128
{
129-
# test reading a file into an array and then closing before
129+
# test reading a file into an array and then closing before
130130
# doing anything with the array (in other words, is perl too lazy)
131131
my $in8 = open($filename);
132132
#?niecza skip 'open does not yet produce an IO object'
@@ -194,7 +194,7 @@ ok($in8.close, 'file closed okay (in8)');
194194

195195
#?niecza skip 'Not yet able to open both :r and :w'
196196
{
197-
my $fh9 = open($filename, :r, :w); # was "<+" ?
197+
my $fh9 = open($filename, :r, :w); # was "<+" ?
198198
isa-ok($fh9, IO::Handle);
199199
#my $line9_1 = get($fh9);
200200
#is($line9_1, "Hello World");
@@ -211,7 +211,7 @@ ok($in8.close, 'file closed okay (in8)');
211211

212212
#?niecza skip 'Not yet able to open both :r and :w'
213213
{
214-
my $fh10 = open($filename, :rw); # was "<+" ?
214+
my $fh10 = open($filename, :rw); # was "<+" ?
215215
isa-ok($fh10, IO::Handle);
216216
$fh10.close;
217217
#ok($fh10.close, 'file closed okay (10)');

0 commit comments

Comments
 (0)