程嶏清单2-5.txt

来自「< linux网络编程工具>>配套源码」· 文本 代码 · 共 16 行

$bigfred = "\Ufred";            
print $bigfred,"\n";
$fred = "fred"; 
$bigfred = "\U$fred";
print $bigfred,"\n";   
$capfred = "\u$fred";
print $capfred,"\n";   
$barney = "\LBARNEY"; 
print $barney,"\n";
$capbarney = "\u\LBARNEY";
print $capbarney,"\n";
$bigbarney = "BARNEY"; 
print $bigbarney,"\n";
$capbarney = "\u\L$bigbarney";
print $capbarney,"\n";