初歩から始める初心者向け
Perl-CGI
講座
■
|
トップページ
|
CGI
設置
|
CGI
作成
|
作成事例
|
設置用語
|
作成用語
|
関数リファレンス
|
FAQ
|
お問合せ
|
CGI
の設置方法
フリーで配布されている
CGI
を設置する際の手順や注意事項などの説明です。
CGI
作成の初歩
初めて
CGI
を作る方向けの手順を簡単な例で説明しています。
CGI
作成ヒント集
こういう事をする時は、どのように行えばいいのか?など具体的な事例を紹介します。
CGI
の設置に関する用語
CGI
の作成に関する用語
CGI
の設置や作成時に使われている用語や関連知識を掲載しています。
設置に関するFAQ
作成に関するFAQ
設置や作成をする際に起こりがちなトラブルの説明と、よくある質問とその回答を掲載しています。
sprintf で置換え後の書式を与える
s/パターン/置換え後式/
e
置換えのオプションで e を指定すると置換え後の文字を式で与える事ができます。
ここでは sprintf を使って置換え後の書式を与えて整形してみます。
下の例では、〜/〜/〜 という書式を 〜年〜月〜日 という書式に置き換えています。
#!/usr/local/bin/perl #対象の文字列 $mozi = '2004/10/3'; $mozi =~ s/(\d+)\/(\d+)\/(\d+)/sprintf ("%04d年%02d月%02d日",$1,$2,$3)/e; #完了メッセージを表示する print "Content-type: text/html\n\n"; print "<META http-equiv=\"Content-Type\" content=\"text/html; charset=Shift_JIS\">\n"; print $mozi; exit;
書式を0で埋めた2桁に修正したいだけの場合パターンは1つで順次置換えを行えば
よく、その際は g オプションを付けて実行します。
下の例では 4/10/3 が 04/10/03 という形に置換えされます。
#!/usr/local/bin/perl #対象の文字列 $mozi = '4/10/3'; $mozi =~ s/(\d+)/sprintf ("%02d",$1)/eg; #完了メッセージを表示する print "Content-type: text/html\n\n"; print "<META http-equiv=\"Content-Type\" content=\"text/html; charset=Shift_JIS\">\n"; print $mozi; exit;
関連項目
・
CGI
の作成に関する用語
・
CGI
作成に関するFAQ
Beginner's CGI
- Copyright (C) 2003 aimix. All Rights Reserved -