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