Select Code to Download

package cookieprob;

use strict;
...
    return $template->output;
}
1;

#!c:/perl/bin/perl.exe -w
use strict;
use cookieprob;
my $cookieprobApp=cookieprob->new();
$cookieprobApp->run();