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

[無邊框]

1335

[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] 18-套件及模組套件和模組入門

[PERL] 命令列傳入參數 argv Perl 的外部傳參，是$ARGV[0]、$ARGV[1]、$ARGV[2].....

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

[PERL] Perl 不立即輸出的列印緩衝區問題解決Perl 不立即輸出而是最後一次輸出的列印緩衝區問題

[PERL] 位元運算 Bitwise operation PERL的位元運算整理

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

隨機好文

[MAC] 截取螢幕畫面的方法截取螢幕畫面的方法，在MAC中叫作螢幕快照，英文是screenshot

SELinux 常用指令和檔案在Redhat系列中，Centos5以後加入了selinux，他並沒有這麼可怕，不必每次看到Selinux ，就想把他

[CodeIgniter 3] 資料庫的使用方法整理2/2 CI3 承襲 CI2，有很多的builder class可以用，依各人的使用習慣，有人喜歡一堆sql字串，有人喜歡用helper

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

在Centos7 下安裝 Wildfly10 wildfly以前叫JBoss，2014.11.20改名叫Wildfly，起始版本是Wildfly8，現在已經出到Wil

到最底端