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

[無邊框]

1483

[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的真值和假值(布林值) 整理Perl中的判斷真假的結果

[PERL] Regex 字元集(群組) 幾個Perl在regular express會用到的特殊符號notation：字元集

[PERL] 使用CPAN安裝模組在Linux 上，CPAN 可以用來安裝或管理 perl 的模組，此文教你怎麼做。

[PERL] 常態分配亂數產生函數一般而言我們使用程式內建的 rand 函數取得的亂數是平均分配的，但如果需要常態分配的亂數產生器該怎麼做？

Perl的類別物件利器 bless 使用bless來替perl建立class物件。

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

隨機好文

一個邏輯的錯誤刪了全部檔案的經驗今天本來想做一件很簡單的事，但卻足足浪費我多一倍的時間，再加上刪掉我全部的檔案，原因只是因為我自己的邏輯錯誤。

世紀帝國征服者新版本--被遺忘的帝國世紀帝國征服者新版本--被遺忘的帝國世紀二代的征服者是精典遊戲中的精典，aofe更好玩...

[PHP] 檢查檔案是否是圖檔使用getimagesize函數檢查檔案是否是圖檔

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

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

到最底端