Help for this page

Select Code to Download


  1. or download this
    package Foo;

use warnings;
...
}

1;
  2. or download this
    $ perl -I. -MData::Dumper -MFoo -e'print Dumper (Foo->data)'
Variable "%data" is not available at (eval 1) line 1.
$VAR1 = {};
  3. or download this
    $ perl -I. -MData::Dumper -MFoo -e'print Dumper (Foo->data)'
Useless use of private hash in void context at Foo.pm line 16.
$VAR1 = {
          'foo' => 'bar'
        };
  4. or download this
    package main;
use warnings;
use strict;
use Data::Dumper;
print Dumper (Foo->data);