Help for this page

Select Code to Download


  1. or download this
    my %hash = ( hello => "foo", world => "bar");
my $hashref = \%hash;       # store a reference to the %hash
print $hashref->{hello};    # prints "foo"
$hashref->{world} = "quz";  # change "bar" to "quz" in orig. hash
  2. or download this
    my $DEBUG = 0;  # at the top of the program
...
$DEBUG and print Dumper(...);
# or
print Dumper(...) if $DEBUG;
  3. or download this
    use constant DEBUG => 0;
...
DEBUG and print Dumper(...);