print uc("test Test") . "\n"; # 引数省略時は$_を変換する $_ = "aaa"; print uc() . "\n";