[精讚] [會員登入]
1494

[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 計算經過的時間 Perl 計算程式執行經過的時間

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

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

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

自行撰寫syslog server建立資訊安全控管中心#2 -- 架構和作法 利用PERL將syslog收攏到資料庫的程式,架構和作法

隨機好文

[jQuery] textarea 的取值和給值 HTML 的 TEXTAREA 標籤若要用 jquery 取值,不能使用 .text() 或 .html() ,使用 .

外匯課程經驗 有天遇到某個朋友的正妹朋友,說她有個很棒的外匯投資課程,要我們去聽,只收場地費200大洋。她又說續效最差一個月也有1%,誰還在苦哈哈上班?

維修海棉拖把頭 這類型的海棉拖把很好用,可是這近發現海棉頭越來越不耐用,也許是錯覺,以往都能用個三四個月,現在二個月就差不多掉下來。 這

[MySQL/Mariadb] console 將查詢結果輸出到檔案 在mysql 的console中該如何將查詢結果輸出到檔案?

[MAC] 好用的傳檔程式Commander One(可用FTP、SFTP等協定) MAC上好用的傳檔程式,免費而且支援FTP、SFTP、Dropbox、Onedrive、GoogleDrive、WebDAV等協定