http://rt.perl.org/rt2/Ticket/Display.html?id=8602 The comments were misleading. Casey West -- Shooting yourself in the foot with Modula-2 You perform a shooting on what might be currently a foot with what might be currently a bullet shot by what might currently be a gun. --- perl-current.orig/pod/perlfunc.pod Fri May 9 00:58:19 2003 +++ perl-current/pod/perlfunc.pod Fri May 9 07:35:51 2003 @@ -1326,9 +1326,9 @@ # insert dashes just before last line of last file while (<>) { - if (eof()) { # check for end of current file + if (eof()) { # check for end of last file print "--------------\n"; - close(ARGV); # close or last; is needed if we + close(ARGV); # either close or last is needed if we # are reading from the terminal } print;Thread Next