Perl のへそ

要望があったので、わたしの使っている Perl スクリプトを一部公開します。公開の目的は、

  1. Perl の知識どころかプログラミングの知識すらほとんどないアホであるこのわたしが適当に書いたスクリプトを衆人の目にさらすことによってその欠点を発見し、スクリプトを改良、強化すること。

です。従って、この辺のスクリプトは自由に使ったり改造したりしていただいて構いません。

ただし、以下のような制限があります。

  1. アホなので、殴りたくなるほどプログラミングがお粗末です。

  2. 自分のことしか考えていないので、刺したくなるほどソースが読みにくいです。

  3. 動作保証は微塵もありません。っていうかそのままじゃたぶん動きません。無謀にもどこかで使おうという場合は適宜改造してください。

  4. プログラム上の欠点(たとえばここは local より my の方が早いんじゃないかとか)やセキュリティホールを見つけたら知らせてください。それが公開の目的ですから。とは言え、これは強制ではなくお願いです。

注意

※謙遜とかではないので念のため。本気で、「ていうか Socket って何ですか?」とかいうレベルです。そんな奴が WWW でスクリプト走らせるなんてのは許されないかもしれませんが、そのためのこのリソースですから。

Perl スクリプト

LZH 書庫でおいておきます。適宜展開してください。また、本体のソース一本しかないので、jcode.pl やデータファイルなどは適宜用意してください。

CGIとして動くモノ

ローカルで走らせるモノ

参考サイト

Perl系で参考にしたサイトとか。

Perl スクリプトを配布しているところと言えば KENT WEB とか レスキューさんの所とかいろいろありますが、ハッキリ言って勉強にはならないのでブックマークすらしていません。スクリプトも HTML が駄目すぎるのでそのままでは使えませんし。


HTML鳩丸倶楽部

bakera.jp

水無月ばけら, MINAZUKI Bakera
E-mail: bakera@star.email.ne.jp