Help for this page

Select Code to Download


  1. or download this
    ...
if ( $line =~ s/ \$VAR1/ my %hash / ) {
    ...
}
...
  2. or download this
    my %hash = (...);
$Data::Dumper::Varname = 'hash';
print Dumper(\%hash);
  3. or download this
    my %hash = (...);
print Data::Dumper->Dump( [\%hash], ['hash'] );