programming-examples/perl/File/When you're done with a file, call close.pl
2019-11-15 12:59:38 +01:00

13 lines
184 B
Perl

close(filehandle);
#!/usr/bin/perl -w
# Test of open and die with $!.
$filename = "nofile";
open(TMP, $filename)
or die "Can't open \"$filename\" due to $! ";