[精讚] [會員登入]
1118

[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 的列舉寫法(map list) 使用列舉的寫法來設定陣列,非常的強大

[PERL] 15-進階比對 #2--使用更多修飾子 perl的正規表達式進階比對

[PERL] 10- 雜湊 Perl 的hash 指標陣列

[PERL] 08-陣列 #2 --操作 更多perl陣列的操作,如拆開、黏合、取出、加入等等

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

[PERL] 19-模組的安裝和維護 模組的安裝和維護

我有話要說

>>

限制:留言最高字數1000字。 限制:未登入訪客,每則留言間隔需超過10分鐘,每日最多5則留言。

訪客留言

[無留言]

隨機好文

如何在linux下執行java 原生的java應用程式可以使用簡單的方法在console下面寫出來,適合作簡單的應用

[Freebsd] 使用 ADSL 撥接上網 Freebsd上要使用 ADSL 撥接上網,該如何設定?

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

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

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