perl 取現在時間並格式化

use POSIX;
my $now_time = POSIX::strftime("%Y-%m-%d %H:%M:%S", localtime(time())); #now time

perl -e 'print localtime(time())' # 30403201111243540

OR

use Date::Format; print time2str("%Y-%m-%d %H:%M:%S", time());
perl -e 'print time()' # 1356003592

使用指令直接執行perl，

# perl -MPOSIX -e 'print POSIX::strftime( "%A, %B %d, %Y", localtime());' //顯示時間
#perl -MLWP::Simple -e 'getprint "http://www.cs.nthu.edu.tw";' //抓網站資料直接在console顯示