時刻表示は、unixのdateコマンドより楽かも知れない。
今日のネタは、これ。
sh-3.00$ cat example1.pl
#!/usr/bin/perl
print "------------------------------n";
$data = localtime;
print "現在時刻を表示するn";
print "$datan";
print "------------------------------n";
$time = time;
print "現在時刻をUNIXTIMEで表示するn";
print "$timen";
print "------------------------------n";
$gmtime = gmtime(time + 0);
print "現在時刻をGMTで表示するn";
print "$gmtimen";
print "------------------------------n";
実行結果は以下の通り。
sh-3.00$ ./example1.pl
------------------------------
現在時刻を表示する
Wed Nov 14 23:00:10 2007
------------------------------
現在時刻をUNIXTIMEで表示する
1195048810
------------------------------
現在時刻をGMTで表示する
Wed Nov 14 14:00:10 2007
------------------------------