在perl中查找整數子串的最佳方法

我有一個字元串

$number="1234567";

我想從中提取子字元串，但我沒有得到正確的substr函式結果。

如果我執行

substr $number ,0,1 ;

我得到1了輸出，但它應該是12。

要獲得12，您需要：

substr $number, 0, 2

的語法substr是：

substr $var, OFFSET, LENGTH

所以當你這樣做時：

substr $number ,0,1

將OFFSET是0，LENGTH將是1。

perl是零索引的，即索引從 開始0，並且您選擇的子字元串的長度是1，因此您只會得到1預期的輸出。

引用自：https://unix.stackexchange.com/questions/315239