cgi

画像をダウンロードするCGI

友達に聞いたりしながら、苦労した。 #!/usr/bin/perl -w use CGI::Carp qw(fatalsToBrowser); use CGI; use File::MMagic; &main; sub main { my $file = "test.gif"; my $type = File::MMagic->new->checktype_filename($file); my $cgi = CGI->new; print…

携帯端末情報を調べるツールを作ってみた

携帯端末情報を取得する API の存在を知ったので、思いつきのままに作ってみた。携帯端末情報取得ページ 携帯の機種名や UA を入力すれば、その端末の画像対応状況や対応flashのバージョン。 画面のサイズやら、色々な情報を取得できます。 2時間で作った割…

レンタルサーバでperlのエラー原因を探る

レンタルサーバだとエラーメッセージが見えずに不便だったりする・・・。そんなときは、これを CGI に書くだけ use CGI::Carp qw(fatalsToBrowser); これでエラー文をブラウザに吐き出すようになります。 めっちゃ便利! 今まで知らなくて、さーせん