Business::ISBN
NAME Business::ISBN - work with International Standard Book Numbers SYNOPSIS use Business::ISBN; # 10 digit ISBNs $isbn10 = Business::ISBN->new('1565922573'); $isbn10 = Business::ISBN->new('1-56592-257-3'); # 13 digit ISBNs $isbn13 = Business::ISBN->new('978-0-596-52724-2'); # convert $isbn10 = $isbn13->as_isbn10; # for the 978 prefixes $isbn13 = $isbn10->as_isbn13; # maybe you don't care what it
Perlメモ/CGI::Applicationモジュール - Walrus, Digit.
CGI::ApplicationモジュールのSYNOPSISにあるサンプルでは、CGIファイルとモジュールを"webapp.cgi"と"WebApp?.pm"の2ファイルに分けています。 実際のアプリケーション作りではこうなっていたほうが（再利用性や柔軟性などから）良いと思いますが、ちょっとCGI::Applicationを試してみるなどという時には、ライブラリパスなどを考えなくて済むように、1ファイルにまとめたいと思うこともあります。この時は、単純に次のようにするだけで実現できます。 !#/usr/bin/perl ### 元"webapp.cgi"の内容... package main; # use WebApp; my $webapp = WebApp->new(); $webapp->run(); ### 元"WebApp.pm"の内容... package WebApp; use
XML::RSS
NAME XML::RSS - creates and updates RSS files VERSION version 1.63 SYNOPSIS # create an RSS 1.0 file (http://purl.org/rss/1.0/) use XML::RSS; my $rss = XML::RSS->new(version => '1.0'); $rss->channel( title => "freshmeat.net", link => "http://freshmeat.net", description => "the one-stop-shop for all your Linux software needs", dc => { date => '2000-08-23T07:00+00:00', subject => "Linux Software", c
HTML::TokeParser - 代替HTML::Parserインターフェース
HTML::TokeParser version 2.20 by Hippo2000(2001/1/25) HTML::TokeParserなのです。 なお内容等が間違っていたら修正します。ご連絡ください。 変更履歴 2002/4/24 古谷俊一さんの指摘を受けてnewの引数の間違いを修正。 目次 名前 概要 説明 例 参考資料 著作権 名前 HTML::TokeParser - 代替 HTML::Parser インターフェース 概要 require HTML::TokeParser; $p = HTML::TokeParser->new("index.html") || die "Can't open: $!"; while (my $token = $p->get_token) { #... } 説明 HTML::TokeParser はHTML::Parseｒクラスへの代替のイン
Perl5 から見た Perl6 の変更点
Landscape トップページ | < 前の日 2006-03-29 2006-03-30 次の日 2006-03-31 > Landscape - エンジニアのメモ 2006-03-30 Perl5 から見た Perl6 の変更点 当サイト内を Google 検索できます * Perl5 から見た Perl6 の変更点この記事の直リンクURL: Permlink | この記事が属するカテゴリ: [Perl] Perl5 から見た Perl6 の変更点。最近では私は Perl を使うのは趣味のプログラミングがメインになっちゃったけど、動向くらいは追っておきたいのでメモ。 既存の文法がかなり変わってる。 文字列連結がは . (ドット) じゃなくて ~ (チルダ)。Perl は動的に方が決まるので、変数を数値として評価するか文字列として評価するかを演算子で明示しなきゃならないからね。 メソッ
まちがった自動ログイン処理
(Last Updated On: 2018年8月20日)問題：まちがった自動ログイン処理の解答です。このブログエントリは最近作られたアプリケーションでは「問題」にしたような実装は行われていないはず、と期待していたのですがあっさり期待を破られたのでブログに書きました。このブログの方が詳しく書いていますけが「Webアプリセキュリティ対策入門」にも正しい自動ログイン処理を書いています。 参考：自動ログイン以外に2要素認証も重要です。「今すぐできる、Webサイトへの2要素認証導入」こちらもどうぞ。HMACを利用した安全なAPIキーの送受信も参考にどうぞ。 間違った自動ログイン処理の問題点 まず間違った自動ログイン処理を実装しているコードの基本的な問題点を一つ一つ順番にリストアップします。 クッキーにランダム文字列以外の値を設定している クッキーにユーザ名が保存されている クッキーにパスワードが保
CPANの漁りかた
Perlの学習コスト高いよね、て感じのエントリが目立つのでふと思い返してみると、ぼくは1年前は 救命病棟でいうところのレベル4くらいでした。変数に our をつけると何がどう違うのかわかなかったりしたのを覚えてます。 その後1年、今はレベル8弱ってとこでしょうか。バグレポートはなるべく出すようにしていますが、車輪になりそうで、モジュールはまだ上げてません。 この1年どうやってレベルを上げてきたかなといえば、CPANあさり、これに尽きます。で、これから Perlやるぞって人にもしかして参考になるかもしれないので、ぼくがやってきた自己流の漁りかたを書いておきます。 1. まずはPerlStyleを読み直す miyagawa さんが以前 WEB+DB PRESS で連載していた Perl Style というのを、総集編マガジンで今も入手可能です。これはロギングとか OR マッピングなどの基本的題
YappoLogs: Acme::Oppai - おっぱいおっぱいおっぱいおっぱいおっぱい
« 【注意勧告】pageoneというspam撒き散らし検索エンジンの件(!yahoo/!google/!livedoor)【転載必須】 | Main | 鼠海 » Acme::Oppai - おっぱいおっぱいおっぱいおっぱいおっぱい そんな事よりもPlaggerがlivedoor Readerに対応したらしいよ！ これでlivedoor Readerにクロールを任せてgmailでエントリ見放題って荒業も可能！ higeponさんのコメントにperl -MOppaiとか書いてあるからおっぱいモジュールをCPANにうｐしてしまいましたおっぱい。 反省はしないおっぱい。 このモジュールは無駄に凝っていておっぱい。 print Acme::Oppai->Oppaiやprint Acme::Oppai->Oppai->Oppai->Oppai->Oppaiなどの用にメソッドを連続に呼び出すとＡＡが呼
Acme::Oppai - Yappo::タワシ
http://d.hatena.ne.jp/higepon/20060407/1144400043 package Acme::Oppai; use strict; use warnings; our $VERSION = '0.01'; use overload q("") => sub { ${$_[0]->[0]} }; sub new { my $class = shift; my $o_str; my $self = [ \$o_str, ]; bless $self, $class; } sub massage { my $self = shift; ${ $self->[0] } .=<<OPPAI; _ ∩ ( ゜∀゜)彡 おっぱい!おっぱい! ( ⊂彡 | | し ⌒Ｊ OPPAI $self; } 1; __END__ =head1 NAME Acme::Opp
LWP::UserAgent - WWW ユーザ・エージェント クラス
Hippo2000 (2000/7/28) LWP::UserAgentモジュールなのです。 作者はGisle Aasさんです。メールで許可をいただきました。 2001/6/21：山宮隆さんからの指摘を受けて、余分な「；」を削除しました。 目次 名前 概要 説明 メソッド 参考資料 著作権 名前 LWP::UserAgent - WWW ユーザ・エージェント クラス 概要 require LWP::UserAgent; $ua = LWP::UserAgent->new; $request = HTTP::Request->new('GET', 'file://localhost/etc/motd'); $response = $ua->request($request); # or $response = $ua->request($request, '/tmp/sss'); # or
Perlメモ/Data::Dumperモジュール - Walrus, Digit.
出力を見やすくするために、頻繁に使用しているオプション。 見映えを気にする必要がある時には、試してみると良いかもしれません。 Indent インデントを0（なし）、1（固定幅）、2（自動可変幅）、...で指定できる。デフォルトが2だが、1が見やすい気が。またファイル出力であれば0でも良い。 Terse 変数名の出力を0（省略しない）、1（可能であれば省略）で指定できる。デフォルトが0でこちらの方がevalでは確実に扱えるが、表示だけのためであれば1が見やすい。 Sortkeys キー項目のソートを0（ソートしない）、1（ソートする）で指定できる。デフォルトは0だが、1の方がずっと目当てのキー項目を探しやすい。 使用時には、通常は以下のようにクラス変数で指定します。 local $Data::Dumper::Indent = 1; print Dumper(@_); OOスタイルであれば、次
GD::Barcode - GDでバーコード・イメージを作成します - perldoc.jp
名前¶ GD::Barcode - GDでバーコード・イメージを作成します 概要¶ ex. CGI use GD::Barcode::UPCE; binmode(STDOUT); print "Content-Type: image/png\n\n"; print GD::Barcode->new('EAN13', '123456789012')->plot->png; エラーチェック付き my $oGdBar = GD::Barcode->new('EAN13', '12345678901'); die $GD::Barcode::errStr unless($oGdBar); #長さが不正 $oGdBar->plot->png; 説明¶ GD::Barcode はGDのサブクラスです。GDでバーコードイメージを作成することを 可能にします。 このモジュールは"Generate Barc
Email::Valid - インターネット電子メールアドレスの正当性のチェック - perldoc.jp
名前¶ Email::Valid - インターネット電子メールアドレスの正当性のチェック 概要¶ use Email::Valid; print (Email::Valid->address('maurice@hevanet.com') ? 'yes' : 'no'); 説明¶ This module determines whether an email address is well-formed, and optionally, whether a mail host exists for the domain. このモジュールは、電子メールアドレスが適格であるか否かを判断します。 さらに、そのドメインのメールホストが存在するか否かも判断します。 Please note that there is no way to determine whether an address is d
Class::Accessor - アクセサの自動生成 - perldoc.jp
Class::Accessor - アクセサの自動生成 概要¶ package Foo; use base qw(Class::Accessor); Foo->mk_accessors(qw(this that whatever)); # Meanwhile, in a nearby piece of code! # Class::Accessor provides new(). my $foo = Foo->new; my $whatever = $foo->whatever; # $foo->{whatever}を取得 $foo->this('likmi'); # $foo->{this} = 'likmi'に設定 # @values = @{$foo}{qw(that whatever)}と同じ @values = $foo->get(qw(that whatever)); # $f
B<CGI::Carp> - HTTPD（またはその他）にエラーログを書込むためのCGIルーチン
[pod] [xml] 名前 CGI::Carp - HTTPD（またはその他）にエラーログを書込むためのCGIルーチン 概要 use CGI::Carp; croak "We're outta here!"; confess "It was my fault: $!"; carp "It was your fault!"; warn "I'm confused"; die "I'm dying.\n"; use CGI::Carp qw(cluck); cluck "I wouldn't do that if I were you"; use CGI::Carp qw(fatalsToBrowser); die "Fatal error messages are now sent to browser"; 説明 CGIスクリプトはタイムスタンプもされず完全に識別もされないエラーログに
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
簡単CGI: IPアドレスからホスト名を取得しよう
The CPAN Search Site - search.cpan.org
Neuron-0.0.1
http://fleur.hio.jp/~hio/perldoc/mix/lib/List/Util.html
PAR Perl のスクリプトを Windows 用の実行ファイル (exe形式) に変換する いやな日記