Help for this page

Select Code to Download


  1. or download this
    # FILE: main script
use strict;
...
}

1; # hey; it's a require after all.
  2. or download this
    my @module_args = $ENV{PATH_INFO} =~ m!/([^/]+)!g;
my $module = shift @module_args || $some_default_value;