[精讚] [會員登入]
1628

[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]] find 和 perl 的結合--大量檔案中文字的取代 利用PERL作大量的文件取代

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

[PERL] 取得字串長度 使用length來取得字串長度

Apache Worker MPM =worker 調整參數 Apache目前一共有三種穩定的MPM(Multi-Processing Module,多進程處理模式 簡稱: MPM)

[PERL] 17-參照 PERL的參照,就是指標

[PERL] 22-日期和時間 Perl 取得日期時間的方法整理,使用 localtime等多種函數

隨機好文

[CodeIgniter3] 解決無法上傳特定檔案(.sb2)的問題 上傳時出現The filetype you are attempting to upload is not allowed,要怎麼解決?

Smarty安裝 smarty 是著名的樣版引擎,非常的好用,用多了突然發現拿掉smarty反而不會寫php了,以下是安裝過程..

精讚的版面變化 ▓此文僅作為舊文的記錄▓ 這篇文章為了紀念改版完成而撰寫。 原本的部落格是民國97年的作品,那時還是用舊有的技術來寫,很

只會買到爛貨的政府採購法 政府採購的公開招標,常常就只能比價格不能比品牌,只能比價格不能比品質,只能比價格不能比口碑,只能比價格不能比信用...

[Javascript] 偵錯方式 (火狐中的javascript偵錯) javascript 並不是很容易偵錯(debug)的語言,但那是以前,現在有很多瀏覽器支持很多的工具,此文以火狐為例談談偵錯...