Perl › モジュール › here Time::Localモジュールはlocaltime関数、gmtime関数とは逆向きの日付・時刻の変換を行うためのモジュールです。 日付と時刻(ローカル時間)をエポック秒に変換するにはTime::Localモジュールのtimelocal関数を使用します。 use Time::Local 'timelocal'; my $sec_from_epoch = timelocal($sec, $min, $hour, $mday, $month, $year); 日付と時刻(協定世界時)をエポック秒に変換するにはTime::Localモジュールのtimegm関数を使用します。 my $sec_from_epoch = timegm($sec, $min, $hour, $mday, $month, $year); 日付・時刻に関する一般的な情報については、以

Perl › 関数 › gmtime gmtime関数を使用すると、現在の日付と時刻を協定世界時で取得するにはを使用します。gmtimeという名前ですが、現在はグリニッジ標準時(GMT)を取得する関数ではなく協定世界時を取得する関数になっています。 # 秒 分 時 日 月 年 曜日 年初か 夏時間を # らの 適用して # 経過日 いるか my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = gmtime; # 時刻文字列 my $localtime = gmtime; ローカル時刻を取得したい場合はlocaltime関数を使用してください。 エポックからの経過時間だけを知るだけでよい場合はtime関数を使用してください。 より便利に日付・時刻を扱いたい場合はTime::Pieceもお勧めです。 日付・時刻に関

Perl › 関数 › here localtime関数を使用すると、現在の日付と時刻を取得することができます。各地域にあわせたローカル時間を取得できます。 # 秒 分 時 日 月 年 曜日 年初か 夏時間を # らの 適用して # 経過日 いるか my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime; # 時刻文字列 my $localtime = localtime; リストコンテキストで使用した場合は日付・時刻の要素情報、スカラコンテキストで使用した場合は、日付・時刻を表す文字列を取得できます。 協定世界時を取得したい場合は、gmtime関数を使用してください。 エポックからの経過時間だけを知るだけでよい場合はtime関数を使用してください。 より便利に日付・時刻を扱いたい場合はTim

Perl › 関数 › here time関数を使用すると、エポックから現在までの経過秒数を取得することができます。エポックとは時刻の基準となるある時点のことです。多くのシステムでは、協定世界時の 1970年1月1日0時0分0秒00:00:00がエポックとなります。 my $sec_from_epoch = time; time関数を使用するとエポックから数えた秒数を取得することができます。この秒数はうるう秒が考慮されていないので実際の時刻と少しの誤差があります。(うるう秒とは毎年地球の自転が遅れるために数年に一度時刻の調整のために挿入される秒のことです。) 日付・時刻に関する一般的な情報については、以下を参考にしてください。 Perlで日付・時刻を扱う エポックとは エポックとは時刻の基準となるある時点のことです。多くのシステムでは、協定世界時の 1970年1月1日0時0分0秒00:00

Perl › 関数 › here スクリプトのファイル名を取得するには__FILE__を使用します。 __FILE__ ファイルをスクリプトとして読み込むと、プログラムはプロセス空間のメモリ上に展開されるのですが、展開する前のファイル名を、Perlは覚えておいてくれます。 サンプル スクリプトのファイル名を取得するサンプルです。 # ファイル名の取得 __FILE__ print "1: ファイル名を取得する。(__FILE__)\n"; print "このファイル名は\n" . __FILE__ . "\n" . "です。\n\n"; print "2: 読み込んだファイルの名前を取得する。\n"; # doで,別ファイルを、このプログラムのプロセス空間のメモリ上に読み込む。 do "SomeModule.pm"; print "読み込んだファイル名は\n", SomeModule::t

Perl › 関数 › here スクリプト上の行番号を取得するには__LINE__を使用します。 __LINE__ サンプル 行番号を取得するサンプルです。 use strict; use warnings; # スクリプト上の行番号の取得 __LINE__ print "1: 行番号名を取得する。\n"; print "この行は、スクリプトの" . __LINE__ . "行目です\n"; Perl › 関数 › here

Perl › 関数 › here __PACKAGE__を指定するとパッケージ名を取得することができます。 __PACKAGE__ サンプルプログラム パッケージ名を取得するサンプルです。 package SomePackage; use strict; use warnings; # パッケージ名の取得 my $package_name = __PACKAGE__; Perl › 関数 › here

Perl › 構文 › here localを使うと、パッケージ変数を一時的に変更することができます。 local 変数名 = 値； 値が指定されなかった場合は、未定義値が設定されます。 値の保存と復元 localを使って値を代入すると、スコープの終わりで以前の値が復元されます。 our $NUM = 5; { local $NUM = 3; } # ここでは「$NUM」は「元の値」である「5」に戻る localによって変更されたパッケージ変数は、スコープの最後で復元されます。 初期化を行わなかった場合は、変数の値の初期値は、未定義値になります。 local $NUM; localはパッケージ変数だけが対象であって、myで宣言されたレキシカル変数には利用できないことに注意してください。 スコープの詳しい解説については以下をご覧ください。 Perlのスコープについて理解しよう localによ