Perl 日付の計算方法

 Perlではtime関数で1970年1月1日0時0分からの経過秒を取得でき、その値をlocaltime関数を通す事で「年/月/日/曜日/時間/分/秒」に変換する事ができますが、逆に「年/月/日/曜日/時間/分/秒」から秒に戻す事は出来ないので関数を考えてみました。
 time()+localtime()で得られた日時を、本スプリクトで変換すれば time()の値と同じになります。

※新バージョンはこちら

続きを読む

Perl:文字参照

 先日POST/GETからの受け取るプログラムを作ったけど、ユーザーから入力された文字列をHTMLに出力するときには、そのまま出力するとHTMLタグが使えたりとセキュリティーリスクになるので一部の文字を無害な文字列に変換しなければなりません。それが文字参照とかエスケープと呼ばれる処理です。

続きを読む