Help for this page
open (FILE, "file") || die "file could not be opened";
$file = "some_file.txt"; open(FILE,"$file") or &Error($!);
sub Error { $error = shift or $error = "unknown"; ... print "Error: $error"; &End; }
close FILE or die "Could not close $file";
www.com | www.net | www.org
No recent polls found