bayashi.jpThis domain may be for sale!
ハングアップの日々 (2004/10)
2004/10/31 ICC について取り上げているサイトを探してみたら、9月の下旬頃にこれを取り上げている日記や blog がたくさん見つかった。アスキープラスに載ったのはこれの影響か。 http://www.odorikani.net/archives/2004_09.html#000116 http://www.hirax.net/diaryweb/2004/09/23.html#200409231 http://d.hatena.ne.jp/arajin/20040923#p9 http://gpm.jp/d/tito/20040924.html#p01 http://fwn.sub.jp/diary_log/diary0409.htm#0925 http://www2.big.or.jp/~iki-iki/?date=20040927#p07 2004
時間の処理(time/localtime) | Perl･CGI講座 | 有限会社ミスティーネット
現在時刻を取得する為には、time 関数を使います。 time 関数では1970年1月1日0：00からの経過秒数を取得できます。 また、これだけでは扱いづらいのですが、 localtime 関数を使うと年･月･日･曜日･･･など、項目ごとに時間のデータをリスト形式で取り出すことが出来ます。 → time 関数のリファレンス → localtime 関数のリファレンス 取得されたリストデータは、下記のように別々の変数にセットすると扱いやすいでしょう。 取得された値についての詳細は、localtime 関数のリファレンス をご参照ください。 $times = time(); ($sec,$min,$hour,$mday,$month,$year,$wday,$stime) = localtime($times); localtime 関数に直接 time 関数を放り込んでもよいのですが、取得し
時間関数について（localtime、timeなど） / 【超初心者のホームページ作成】
■ 時間関数について（localtime、timeなど） Perlで日付・時刻などを扱うには時間関数を使用します。 時間関数には次のようなものがあります。 time() 現在の時刻（日付・時間）を取得します ただし、値は1970年1月1日 00:00:00 UTCからの秒数を返します Macの場合、1904年1月1日 00:00:00からの秒数です ※UTC．．協定世界時間（詳しいことはネットで調べてください。 gmtime() time関数形式の時間をグリニッジ標準時に変換します 通常は、「Fri Mar 25 02:50:36 2005」のような書式で左から順に 曜日の英字3文字（Sun、Mon、Tue、Wed、Thu、Fri、Sat） 月の英字3文字（Jan、Feb、Mar、Apr、May、Jun、Jul、Aug、Sep、Oct、 Nov、Dec） 日（1〜31） 時：（0〜23）
Time::Local - 時刻情報をエポック秒に変換 - Perl入門ゼミ
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で日付・時間を操作 - DateTime モジュールの使い方 (iandeth.)
Perlには、日時の加・減算を扱うモジュールが標準でついてきません。僕の仕事場ではずっと、同僚が作ったオリジナルモジュールを皆で使いまわしていたのですが、今になって、世間的 (CPAN) にはどんなものがあるのか気になって調べてみました。※参考になったのは miyagawa 氏のメールマガジンの過去記事と、perl.com の The Many Dates and Times of Perl なるエントリでした。 今回は数ある日付関連モジュールの中から、Dave Rolsky氏の DateTime モジュールについて、その基本的な使い方について簡単にまとめたので共有してみます。 同氏は上記 perl.com 記事の執筆者であり、この前の YAPC::Asia で DateTime project について講演してくれていた人です。気合の入ったモジュールを作ってくれた事に感謝。 目次 基本
Perl の数値変換
Last Updated: 2002/03/26 Perl で、16進文字列、10進整数、2進文字列、バイナリー文字列の相互変換を行うための、スクリプトメモです。 特に断っていない限り、Perl 5.001 以上で動作します。 目次 16進文字列からの変換 10進整数からの変換 2進文字列からの変換 バイナリー文字列からの変換 16進文字列→10進整数への変換 hex() 関数は、16進文字列を整数値に、手軽に変換できます。 $num10 = hex("4A"); # $num10 には 74 が入る $num10 = hex("FFFFFF"); # $num10 には 16777215 が入る 余談ですが、数値リテラル中では 0x に続けて 16 進数で記述することで、数値を表すことができます。 $num10 = 0x4A; # 74 $num10 = 0xFFFFFF; # 1677
ファイルハンドルと出力 - 2部 Perl言語仕様 - [SMART]
ファイルテスト演算子の使い方 $file = "/home/httpd/html/index.html"; # ファイルが存在するか確認 if ( -e $file ){ .... } パイプ UNIX 系 OS 全般や、Windows NT といったサーバ OSには、パイプが用意されています。パイプは、プロセス間で通信するために用意された機構で、標準出力と標準入力を経由してデータを受け渡しするためのものです。これによって、一時ファイルなどを経由せずに、ダイレクトにプログラムが標準出力に出力した結果を他のプログラムの標準入力に渡すことができます。 open でパイプ処理 以下では Perl からパイプを使った例を紹介します。ファイル名の先頭に | を付けると、そのファイル名をコマンドとして解釈し、そのコマンドラインへ出力します。 sendmail を使ってメールを送信する例です。 open
![ファイルハンドルと出力 - 2部 Perl言語仕様 - [SMART]](https://cdn-ak-scissors.b.st-hatena.com/image/square/efeb6493234f33406d242c048873a805fca99c63/height=288;version=1;width=512/https%3A%2F%2Frfs.jp%2Fwp-content%2Fthemes%2Fsmart%2Fogpimage.png)
Perl小技集1
まとまり無いんですがここではよく使う小技を取り上げていきます。どれもDBMS周りのコードを効率良く書く上でよく使っています。 １．処理部を制御文の前に書く 一部の制御文では処理部を制御文に前置できます。以下の最後の例はCのswitch文を エミュレートするのに便利です。またこの場合制御文の小カッコは省略できます。 return(1) if $vr eq 'ABC'; print( "Aho !" ) if $name eq 'Baka'; $flag = 1; { print( "ABC\n" ) , last if $flag == 1; print( "DEF\n" ) , last if $flag == 2; print( "Error!!\n" ); } ２．参照（Reference）とは これを説明しないと話しを先に進められないので簡単に解説しておきます。 Perl4以前には参
パッケージとモジュール Perl講座（Exporter、@ISA、@EXPORT、@EXPORT_OK）
四角の枠に囲ってある段落で、> というマークは出力行、もしくはコマンドラインを意味します。 例 print "Hello\n"; > Hello 謝辞 インターネットのおかげで無料で勉強でき、プログラムの仕事をするようになりました。とても感謝です。そのお返しという程でもありませんが、勉強の成果を公開することにしました。 この講座に掲載した情報のすべては、インターネットからかき集めたものが大半です。その情報が正しいものかどうかは確かめたのですが、それはちょっと怪しいものですので、間違いや誤解などが含まれている可能性があります。 ということで、ちょっとおかしいなと思ったらご報告お願いします。 次にこの講座にきたときは、ただしい文章が掲載されていると思います、たぶん。
制御構文 - 2部 Perl言語仕様 - [SMART]
条件文 条件文はいくつかの選択肢をコード内で実現したい際に使用します。「もし～ならば、・・・を実行する」、「もし～ならば、・・・を実行しない」といったように条件によって処理を実行したり、いくつかの選択肢の中からひとつの処理を実行したりといったことを実現することができます。 if文 「もし～ならば、・・・を実行する」という条件つきの命令を実現するために、if 文が用意されています。if文は、カッコの中の条件式を評価し、TRUE のときだけ if ブロックの命令文を実行します。 if ( 条件式 ) { 処理.... } 変数 $var の値が A の時だけ出力するには次のようになります。 if ( $var eq 'A' ) { print "Aです\n"; } 条件式は複数あってもかまいません。複数の条件を並べたいときは、論理演算子の and もしくは or を使います。 # or: $v
Perlメモ
複数のプロセスでロック状態が異常であると判断し，そのうちの 1つがロックを解除したことにより，別のプロセスがロックしたにもか かわらず，先ほどロック状態が異常であると判断したプロセスによってこの正常なロッ クを解除されてしまう可能性があります． この方法の問題点は，異常なロック状態を解除する操作が正常なロック状態をも 解除できてしまうことにあります．逆に言えば，異常なロック状態を解除する操作に よって正常なロック状態を解除できなければ問題ないわけです．そのためにはどうす ればよいのか？ 答えはロック状態が常に変化していけば よいということです．そして，これを実現するのに都合がよいのが rename による方法になります． 最初のスクリプトで説明しますと，ロックファイルが lockfile という 名前のときがロックが解除されている状態で，lockfile987654321 のよう に後ろに
Perlでブラウズ(HTTP)
このページでは、インターネットでホームページなどをブラウジングするときに利用するHTTPプロトコルについて、Perlスクリプトを使って説明しています。 概要 HTTPプロトコルとは、Hypertext Transfer Protocolの略で、インターネットでホームページなどをブラウジングするときに利用しているプロトコルです。 HTTPプロトコルは、TCP/IP上のプロトコルで、通常80番ポートを使ってアクセスします。 詳細な定義は、以下のRFCで定義されています。 RFC-2068は、古くなっている（obsolated）ため、RFC-2616を参照しましょう。 RFC-1945 HTTP/1.0 RFC-2068 HTTP/1.1 (Obsolated) RFC-2616 HTTP/1.1 基本的にHTTPプロトコルは、メッセージを要求(リクエスト)し、その応答結果(レスポンス)を表示す
よく使用する関数・標準モジュール一覧 - Perl入門ゼミ
Perl › よく使う関数・モジュール よく使用する関数・標準モジュールの一覧です。これらの関数を覚えておけば、Perlをより便利なものにすることができます。詳細な解説は避け、簡単なサンプルを紹介しています。戻り値のあるものについては$retという記号で表しています。 また、よく使用する特殊変数、標準モジュールについても、解説しています。各項目から、関数の詳細にもリンクしていますので、便利にご利用ください。 数学関数 文字列操作 配列操作 ハッシュ操作 ファイル入出力 ファイル・ディレクトリ操作 時刻・時間 その他の重要な関数 関数とモジュールのドキュメントの調べ方 よく使用する特殊変数 よく使用する標準モジュール 数学関数 abs 絶対値を求めるにはabs関数を使用します。 $ret = abs $num; abs(-3)は3になります。 sqrt 正の平方根を求めるには、sqrt関数を
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://www.g-ishihara.com/perl/file07.html
移転しました
Perl基礎入門 | KentWeb
移転しました
PerlでMySQL操作CGIを作ろう