[EMAIL PROTECTED] wrote:
>
> Can someone shorten this upper routine?
>
> sub toUpper
> { my $z = shift;
> $z =~ tr/a-z/A-Z/;
> return $z;
> }
sub toUpper { uc shift }
> Also in a slightly different scenario, how can i change the value of the
> parameter itself with a sub.
>
> $a="ca";
> toUpper($a); #change the $a value itself
> print $a; #I want it to print "CA"
sub toUpper { $_[0] = uc $_[0] }
perldoc -f uc
perldoc perlsub
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
