GMT による時間表現文字列を JST に変換する Perl コード片

GMT による時間表現文字列を JST に変換する Perl コード片

GMT による時間表現文字列を JST に変換する Perl コード片 2010-03-01-5 [Programming] 自分用メモ。 P...概要を表示 GMT による時間表現文字列を JST に変換する Perl コード片 2010-03-01-5 [Programming] 自分用メモ。 Perl による GMT to JST 変換。 標準環境での利用を想定（非標準モジュールのインストール無し）。 コード（gmt2jst.pl）： #!/usr/bin/perl use strict; use warnings; use POSIX qw(strftime); use Time::Local; # $ENV{'TZ'} = "JST-9"; my $tm = "2009-12-31T23:00:01Z"; # GMT $tm =~ /^(\d+)-(\d+)-(\d+)T(\d+):(\d+):(\d+)/; my $utm = timegm($6, $5, $4, $3, $2-1, $1); my $tmstr = strftime

• perl
• programming