[PERL] 自寫 trim, ltrim, rtrim 函數 @新精讚

[無邊框]

1374

[PERL] 自寫 trim, ltrim, rtrim 函數

“

常用的 perl 函數中沒有trim, ltrim, rtrim這三個函數，那就自己來寫，非常容易

„

分享此文連結 //n.sfs.tw/10670

分享連結 [PERL] 自寫 trim, ltrim, rtrim 函數@新精讚

(文章歡迎轉載，務必尊重版權註明連結來源)

2019-10-18 07:39:28 最後編修

2017-01-24 01:52:23 By 張○○

常用的 perl 函數中沒有trim, ltrim, rtrim這三個函數，那就自己來寫，非常容易

sub rtrim {
    my $str=shift;
    $str =~ s/\s+$//g;
    return $str;
}

sub ltrim {
    my $str=shift;
    $str =~ s/^\s+//g;
    return $str;
}

sub trim {
    my $str=shift;
    $str = &rtrim( $str);
    $str = &ltrim( $str);
    return $str;
}

使用方法：

$str= " This is a spacing string ";
$str = &trim($str); // "This is a spacing string"

原文2009-11-23 10:04:58

END

你可能感興趣的文章

Perl 的特殊變數：$` $' $#陣列 $1 $2 .. $10 \1 \2 .. \10 介紹Perl 的 $` $' $#array $1..$10 \1..\10這些變數

[PERL]] find 和 perl 的結合--大量檔案中文字的取代利用PERL作大量的文件取代

[PERL] 14-進階比對 #1--取回比對內容 perl的正規表達式進階比對

Perl 的特殊變數：$_、$&、$! 介紹perl的特殊變數 $_ 、 $&、$!

關於Perl，你得知道這幾點 Perl 有不少奇異的地方，值得看一看

[PERL] 檢查IP是否在某個網段內：matchcidr 檢查IP是否在某個網段內 matchcidr in perl

隨機好文

使用Google尋找你的手機這近發現google竟然可以用來找android的手機，而且不需要經過什麼設定或安裝軟體。

[Freebsd] 定時測試 ADSL 是否斷線並重連中華電信 ADSL 雖有固定 ip，可是他卻會不定時「斷線」, 使用以下的方法可以定時測試是否斷線，以及重新撥接。

詭異的創業思維創業的思維中，有多少銀彈，有多少技術，有多少人脈，有多少時間等等，每個都要考慮進去，以熱忱建立的關係脆弱的像蘇打餅乾一樣..

最值得學的電腦技能什麼是最值得學的電腦技能？程式設計？美工繪圖？系統網路？還是…？都不是！個人覺得一個最值得學的電腦技能就

此一時彼一時我是不是易怒的人，其實我也不知道，總之我常會失控，不知道自己在幹嘛。這近生活過得浮浮的，不是很踏實，總會想太多，我甚至會

到最底端