use strict;

my $str = "abc";
$str = uc($str);
print $str;