Chance Ervin [mailto:[EMAIL PROTECTED] : : : I am trying to open a file, and read the contents, but every : execution gives : me an error: : : cannot open filename: Bad file number : : Below is the program as it stands now. I am guessing that I : have a trailing : something causing the issue, but I can't seem to put my finger on it. : : Thanks for the help. : my $mailer = Mail::Mailer->new(); : my $from_address = 'check_log@' . $host; : my $to_address = '[EMAIL PROTECTED]'; : my $subject = $host . ": " . "Log Scan - " . $opt_f; : : open(LOGFILE, "$opt_f") || die "cannot open $opt_f: $!\n"; : while (<LOGFILE>) { : push (@log_content, $_); : } : close (LOGFILE, "$opt_f") || die "cannot open $opt_f: $!\n";
Close only takes 1 argument. Try: close LOGFILE or die "Cannot close $opt_f: $!"; Or: close (LOGFILE) || die "Cannot close $opt_f: $!"; If you leave the "\n" off after $! perl will tell you the line number of the error as well. HTH, Charles K. Clarkson -- Mobile Homes Specialist 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>