CGI(Perl)：（便利ソースタグ備忘録）

CGI(Perl) mail お問い合わせ Mail

おみくじ参考例⇒　「　おみくじの参考例　」 #! /usr/local/bin/perl @kuji = ('大吉 (^O^)／C□☆□D＼(^_^ )カンパーイ!','中吉（´∀｀∩）↑age↑ ','小吉（　´ー｀）ｙ―┛~~','吉 ∈(ﾟ◎ﾟ)∋','凶 ((（；-д- ）=3ﾊｧﾊｧ'); #おみくじの配列 $rand = int(rand 5); #0～4の乱数 # HTML出力 print "Content-type: text/html\n\n"; print "<html>\n"; print "<head>\n"; print "<title>おみくじ</title>\n"; print "</head>\n"; print "<body bgcolor=\"#FDF5E6\"><center>♪～(￣ε￣；)<br><br><b>\n"; print "$kuji[$rand]</b><br>\n"; print "</center></body>\n"; print "</html>\n"; exit;
更新のたびに背景画像を変える　　　表示例⇒「背景画像」「.cgi」ファイルにコピペ！右の例では、乱数がint(rand 5) 壁紙の枚数が0～5枚にしています。つまり、6枚を用意。画像ファイルの置き場所を表示。 #! /usr/local/bin/perl # 画像保存先（0～の番号で保存されている） $img = "./"; # 乱数 $rand = int(rand 5); # 画像ＵＲＬ $img = "$img$rand.jpg"; # HTML出力 print qq(Content-type: text/html\n\n); print qq(<html>\n); print qq(<head>\n); print qq(<title>見る度に背景画像が変わります</title>\n); print qq(</head>\n); print qq(<body background="$img">\n); print qq(見る度に背景画像が変わります<br>\n); print qq(</body>\n); print qq(</html>\n); exit;
訪問回数（クッキー, $ENV{'HTTP_COOKIE'}, Set-Cookie） #! /usr/local/bin/perl $COOKIENAME = "count"; #　クッキー名 $COOKIELIFE = 30; #　クッキー保存日数 $count = 0; # クッキーデータ取り込み foreach $pair (split(/;\s/, $ENV{'HTTP_COOKIE'})) { my ($name, $cookie) = split(/=/, $pair); if($name eq $COOKIENAME) { $count = $cookie; last; } } # クッキーデータ作成 $count++; # 訪問回数＋１ @mon = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec); @wdy = qw(Sun Mon Tue Wed Thu Fri Sat); $life = $COOKIELIFE 24 * 60 * 60; ($sec, $min, $hour, $day, $mon, $year, $wday) = gmtime(time + $life); $expires = sprintf("%s, %02d-%s-%04d %02d:%02d:%02d GMT", $wdy[$wday], $day, $mon[$mon], $year + 1900, $hour, $min, $sec); # HTML出力 print "Content-type: text/html\n"; print "Set-Cookie: $COOKIENAME=$count; expires=$expires;\n\n"; #　クッキー保存 print "<html>\n"; print "<head>\n"; print "<title>訪問回数</title>\n"; print "</head>\n"; print "<body>\n"; print " $count 回目の訪問です<br>\n"; print "</body>\n"; print "</html>\n"; exit;

ホームページ作成日記

ページマップリスト

「CGI(Perl)」	「CGI(Ruby)」	CGI(Python)
スタイルシート(CSS)	その他便利等１	その他便利等２
.htaccess	HTMLソース	JavaScript

カラーチャート【１】

カラーチャート【２】

カラーチャート【３】