my $cookie = $q->cookie(-name=>'id', -value=>$name ,
                        -expires=>'-1h');


##</code><code>##

($_='jjjuuusssttt annootthheer
     pppeeerrrlll haaaccckkeer')=~y/a-z//s;print;