in reply to Re: A Simple
in thread A Simple "Tail" Question
This can easily be done with CGI.pm.
print $q->header(-nph=>1);my $name = 'Ben Kittrell'; $name=~s/^(.+)\s(.).+$/\L$1$2/g; my $nick = 'tha' . $name . 'sta';
|
---|
In Section
Seekers of Perl Wisdom