簡単な Perl CGI の作成方法

藏色散人
藏色散人オリジナル
2019-01-17 14:54:056793ブラウズ

CGI スクリプトは単純な場合もあれば、複雑な場合もあります。 Perl、Java、Python、または任意のプログラミング言語を使用できます。 CGI アプリケーションの核心は、HTTP (通常は Web ブラウザ) 経由でリクエストを受け入れ、HTML を返すだけです。単純な Perl Hello World CGI スクリプトを最も単純な形式に分解してみましょう。

簡単な Perl CGI の作成方法

「Hello World」CGI Perl スクリプト

#!/usr/bin/perl
print "Content-type: text/html\n\n";
print <<HTML;
<html>
<head>
<title>A Simple Perl CGI</title>
</head>
<body>
<h1>A Simple Perl CGI</h1>
<p>Hello World</p>
</body>
HTML
exit;

このプログラムをコマンド ラインで実行すると、期待どおりの動作をすることがわかります。 。まず、content-type 行を出力し、次に生の HTML を出力します。 Web ブラウザで動作を確認するには、スクリプトを Web サーバーにコピーまたはアップロードし、権限が正しく設定されていることを確認する必要があります (*nix システムでは chmod 755)。正しく設定されると、参照してサーバー上でページが稼働していることを確認できるようになります。

重要な行は最初の print ステートメントです:

print "Content-type: text/html\n\n";

これは、これら 2 つの改行の後のドキュメントが HTML であることをブラウザーに伝えます。次にどのような種類のドキュメントが来るかをブラウザが認識できるようにヘッダーを送信する必要があります。また、ヘッダーと実際のドキュメントの間に空行を含める必要があります。

ヘッダーを送信した後は、HTML ドキュメント自体を送信するだけです。上記の例では、ヒアドキュメントを使用して、プレーン テキストの大きなブロックの印刷を簡素化しています。もちろん、これはサーバー上にプレーンな HTML ドキュメントがあることと変わりません。 Perl などのプログラミング言語を使用して HTML を作成する真の威力は、派手な Perl プログラミングを追加したときに発揮されます。

基本スクリプトに追加

次の例では、この時刻と日付のスクリプトの一部を Web ページに追加してみましょう。

 #!/usr/bin/perl
@months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
@weekDays = qw(Sun Mon Tue Wed Thu Fri Sat Sun);
($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime();
$year = 1900 + $yearOffset;
$theTime = "$weekDays[$dayOfWeek] $months[$month] $dayOfMonth, $year";
print "Content-type: text/html\n\n";
print <

A Simple Perl CGI


A Simple Perl CGI

$theTime

HTML exit;

この新しい CGI スクリプトは、スクリプトが呼び出されるたびに現在の日付をページに挿入します。つまり、静的なドキュメントではなく、日付が変わると変化する動的なドキュメントになります。

以上が簡単な Perl CGI の作成方法の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。

声明:
この記事の内容はネチズンが自主的に寄稿したものであり、著作権は原著者に帰属します。このサイトは、それに相当する法的責任を負いません。盗作または侵害の疑いのあるコンテンツを見つけた場合は、admin@php.cn までご連絡ください。