如何截取字符串前两位?

fly_orange

1^# fly_orange 发表于 2006-03-30 20:12

如何截取字符串前两位?
比如字符串P1-LOW,如何用Perl只取前两位值P1？

cnhacktnt

2^# cnhacktnt 发表于 2006-03-30 20:57

[quote]--$str1="P1-LOW.
[quote]
$str1="P1-LOW";
$str2=substr($str1,0,2);
print $str2;
[/quote]
这只是其中一种方法，还可以用正则，split等等...
多看看perl基础吧 :-)

fly_orange

3^# fly_orange 发表于 2006-03-31 09:20

非常感谢！[CCB]1[/CCB].
非常感谢！[CCB]1[/CCB]