Hi John (and others)!
So far, I have this code (with good help from Venu :-), and it works:
my $file = shift; open (TEST, "$file");
Don't do this. First, there is no need to quote a variable that contains a string. Second, we always need to verify that an open() succeeds or find out why it did not.
open TEST, $file or die "File error: $!";
James
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
