Ing. Branislav Gerzo schrieb:
Hi all,
quite interesting, how you would write this without $temp:
use strict;
use warnings;
my $first = 'B';
my $second = 'a';
($first, $second) = ($second , $first);
print $first, "\n";
print $second, "\n";
but I want keep case of chars, so output is:
"Ab"
Have a nice day :)
Like that?:
use strict;
use warnings;
my $first = 'B';
my $second = 'a';
($first, $second) = (uc($second) , lc($first));
print $first, "\n";
print $second, "\n";
Elvis
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
