$name = "world"; $uc_name = uc($name); print $uc_name,$/; #### $name = "world"; $name =~ tr/[a-z]/[A-Z]/; print $name, $/;