Select Code to Download

#!C:/Perl/bin/perl.exe

...

my $app = Auto->new(PARAMS => {my_param => 'some val'});
$app->run;

package Auto;

...
}

1;

package Start;

...
}

1;