Help for this page

Select Code to Download


  1. or download this
    my $package = My::Package->new( \&user_sub );

...
{
   # code here
}
  2. or download this
    # in My::Package
sub operater_on_all_data
...
sub user_sub {
    return $_ * 2;
}
  3. or download this
    # in My::Package
sub operater_on_all_data
...
sub user_sub {
    return $_ * 2 * $My::Package::helper;
}
  4. or download this
    # in My::Package
sub operater_on_all_data
...
    my $multiplier = shift;
    return $_ * 2 * $multiplier;
}