perl 取現在時間並格式化

?

1 2 3 4 5 6 7 8 9

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，

?

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