On Sun, May 12, 2002 at 07:14:27PM +0200, José Nyimi wrote: > I'm interested to see how you will do the small convertion below. > > 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.
sub convert { ucfirst lc shift } > Cool ;-) Thanks :-} -- Paul Johnson - [EMAIL PROTECTED] http://www.pjcj.net -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]