Perl substr用法及代碼示例

描述

此函數返回 EXPR 的子字符串，從字符串中的 OFFSET 開始。如果 OFFSET 為負數，則從字符串末尾開始那麽多字符。如果指定了 LEN，則返回該字節數，如果未指定，則返回 end-of-string 之前的所有字節。如果 LEN 為負數，則在字符串末尾留下那麽多字符。

如果指定了 REPLACEMENT，則用 REPLACEMENT 字符串替換子字符串。

如果指定超出字符串末尾的子字符串，則它僅返回原始字符串的有效元素。

用法

以下是此函數的簡單語法 -

substr EXPR, OFFSET, LEN, REPLACEMENT

substr EXPR, OFFSET, LEN

substr EXPR, OFFSET

返回值

此函數返回字符串。

示例

以下是顯示其基本用法的示例代碼 -

#!/usr/bin/perl -w

$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