Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
my $filename = 'ourfile.txt';

# open call goes here.
  2. or download this
    open my $fh, '<', $filename; # No warning;
open my $fh, $filename or die $! # No warning;
open my $fh, $filename; # Issues a warning.
  3. or download this
    Parentheses missing around "my" list at mytest.pl line 11 (#1)
  4. or download this
        (W parenthesis) You said something like
    
...
        my ($foo, $bar) = @_;
    
    Remember that "my", "our", "local" and "state" bind tighter than c
+omma.