Perl_截取字符串_substr($string,4)
my $string="123456789";my $b=substr($string,4);print $b; #1234 #0代表起始位置，也就是1，而4代表取多少个。
my $b=substr($string,-10);
#表示取序列倒数十个
my $b=substr($string,-9,5);
#表示从后往前数9个的位置开始（包括）往后取5个。
