更新：
输入：$ str =“abcd”;
输出(截断3个字符)：$ str是abc
$shortened = substr( $long,50 ); # 50 characters long,starting at the beginning.
更多，请使用perldoc
perldoc -f substr
在你的情况下，它将是：
$str = 'abcd'; $short = substr( $str,3 );
