perl substr()函数

perl substr()函数例子，substr()函数实例代码 - 返回EXPR的子字符串，起始是为字符串内的偏移量OFFSET。

语法

substr EXPR, OFFSET, LEN, REPLACEMENT substr EXPR, OFFSET, LEN substr EXPR, OFFSET

定义和用法

返回EXPR的子字符串，起始是为字符串内的偏移量OFFSET。如果OFFSET为负，开始有很多的字符结尾的字符串。如果LEN指定，返回的字节数，或所有的字节，直到结束的字符串(如果不指定)。如果len为负数，结束掉多少个字符的字符串。

如果更换REPLACEMENT 指定的子串替换，替换REPLACEMENT 的字符串。

如果您指定的子串，越过结尾的字符串，返回原始字符串的唯一有效的元素。

返回值

• 字符串

例子

试试下面的例子：

#!/usr/bin/perl -w
#by www.gitbook.net

$temp = substr("okay", 2);
print "Substring valuye is $temp\n";

$temp = substr("okay", 1,2);
print "Substring valuye is $temp\n";

这将产生以下结果：

Substring valuye is ay
Substring valuye is ka