Help for this page

Select Code to Download


  1. or download this
    my $var = 10; # This is a lexical variable.
$van = 5;     # This is a package global.
  2. or download this
    {
  my $var = 10;
...
  print "\$var = $var; \$van = $van\n";
}
# Here, $var and $van don't exist.
  3. or download this
    use strict;
use warnings;
...
delete hash{$_} for grep { /^v/ } keys %hash;

print "var = $hash{var}; van = $hash{van}\n";
  4. or download this
    $hash{$_} = undef for grep { /^v/ } keys %hash;