程嶏清单8-8.txt

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

$string = "This is what you have";
print $string,"\n";
substr($string, 5, 2) = "wasn't"; # change "is" to "wasn't"
print $string,"\n";
substr($string, -12)  = "ondrous";# "This wasn't wondrous"
print $string,"\n";
substr($string, 0, 1) = "";       # delete first character
print $string,"\n";
substr($string, -10)  = "";       # delete last 10 characters
print $string,"\n";