On Wed, 2003-07-16 at 00:26, Tomas Johansson wrote:
> Yes, or if you have an array of strings, and want to replace all capital
> letters in all strings, maybe this could be a solution:
>
> sub toLower
> {
> my @parms = @_;
> for (@parms) { tr/A-Z/a-Z/ }
> return wantarray ? @parms : $parms[0];
> }
>
> @result = toLower(@array);
>
> Also works when just passing one string:
>
> $result = toLower($string);
Sorry, I made a typo.
It should (of course) be:
for (@parms) { tr/A-Z/a-z/ }
/Tomas
--
redhat-list mailing list
unsubscribe mailto:[EMAIL PROTECTED]
https://www.redhat.com/mailman/listinfo/redhat-list
