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

[無邊框]

1225

[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] 16-字串取代和置換 Perl 字串比對及置換

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

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

[PERL] 12- 副程式 Perl 的副程式就是所謂的函數

[PERL] 06-運算子 #2 PERL的運算子介紹，總共有21種

[PERL] 可用中文取名的中文名函式和package 原來perl 也可以用中文當函式、類別、方法的名稱啊

隨機好文

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

海棉寶寶超泡杯演奏的sweet victory 章魚哥和海棉寶寶在超泡杯的演奏歌曲

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

[大型機台] 熱血高校躲避球多少少年時光歲月耗在這個遊戲上，二十幾年前的那個時光，唯一想做的事就是把吃飯錢省下來拿去打一場五塊錢的電動，就算是沒錢也

[MAC] 安裝APACHE+PHP OS Darwin OpenIDMac1deAir 15.6.0 Darwin Kernel Version 15.6.

到最底端