Hello All,
The Perl slogan is: "There Is More Than One Way To Do It". I'm interested to see how you will do the small convertion below. Here is one of mine: probably not the best one :-). #!/usr/bin/perl use strict; use warnings; my $out=&convert('abCdE'); print "$out\n"; sub convert { my($in)=@_; $in=~/(.)(.*)/; $in=uc($1).lc($2); return $in; } The task is simply to upercase the first char of a given string and lowercase the rest. Cool ;-) José. --------------------------------- Yahoo! Mail -- Une adresse @yahoo.fr gratuite et en français !