常用的 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 = <rim( $str);
return $str;
}
使用方法：
$str= " This is a spacing string ";
$str = &trim($str); // "This is a spacing string"
原文2009-11-23 10:04:58
[PERL] 命令列傳入參數 argv Perl 的外部傳參，是$ARGV[0]、$ARGV[1]、$ARGV[2].....
[PERL] 06-運算子 #2 PERL的運算子介紹，總共有21種
[PERL] 常態分配亂數產生函數 一般而言我們使用程式內建的 rand 函數取得的亂數是平均分配的，但如果需要常態分配的亂數產生器該怎麼做？
[PERL] 23-多執行緒 而多執行緒的程式，可在一次執行程式時間，同時進行多線程的計算，在效率上可獲得即大的提升。
[PERL] 15-進階比對 #2--使用更多修飾子 perl的正規表達式進階比對
[PERL] 可用中文取名的中文名函式和package 原來perl 也可以用中文當函式、類別、方法的名稱啊
沒有非誰做不可的事，也沒有不可被取代的人 沒有非誰做不可的事，也沒有不可被取代的人
Linux shell 的date表示法 linux下SHELL中的date表示法
[CodeIgniter3] 解決無法上傳特定檔案(.sb2)的問題 上傳時出現The filetype you are attempting to upload is not allowed，要怎麼解決？
精讚的版面變化 ▓此文僅作為舊文的記錄▓ 這篇文章為了紀念改版完成而撰寫。 原本的部落格是民國97年的作品，那時還是用舊有的技術來寫，很
設計的工作絕不接受比價 拿買陽春麵的價格想買牛肉麵，寧願倒掉也不賣
