Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
open(my $fh,'>:unix','abc.txt') or die $!; 
print $fh "one line\n"
  2. or download this
    use strict;
use warnings;
...
close $fh;
# No error message on unlink
unlink 'abc.txt' or die $!;
  3. or download this
    use strict;
use warnings;
...
close $fh;
# Error message on unlink
unlink 'abc.txt' or die $!;