diff options
author | Daniel Grisinger <dgris@dimensional.com> | 1998-05-15 10:18:26 -0600 |
---|---|---|
committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-05-28 17:51:49 +0000 |
commit | f4dad39ef1a76c1f6bbf6733d7c2ee209381be78 (patch) | |
tree | 3418d6cfba814e1e806e35645db16b84565d7dd2 /lib/FileHandle.pm | |
parent | f0784f6a4c3e45e13aac90c9b07dd4163084f9a4 (diff) | |
download | perl-f4dad39ef1a76c1f6bbf6733d7c2ee209381be78.tar.gz |
[PATCH] _04m2 <DOC> perlfunc.pod (fwd)
Date: Fri, 15 May 1998 16:18:26 -0600 (MDT)
(above minus the t/system.t test pending checking)
Subject: [PATCH] 5.004[04|65] <DOC> FileHandle.pm
Date: Wed, 20 May 1998 19:50:50 -0600 (MDT)
Subject: [PATCH] _65 and _04 <DOC> patching.pod
Date: Thu, 21 May 1998 16:33:03 -0600 (MDT)
p4raw-id: //depot/perl@1044
Diffstat (limited to 'lib/FileHandle.pm')
-rw-r--r-- | lib/FileHandle.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/FileHandle.pm b/lib/FileHandle.pm index 72ecdac1b6..eec9b61f31 100644 --- a/lib/FileHandle.pm +++ b/lib/FileHandle.pm @@ -112,7 +112,7 @@ FileHandle - supply object methods for filehandles use FileHandle; $fh = new FileHandle; - if ($fh->open "< file") { + if ($fh->open("< file")) { print <$fh>; $fh->close; } |