[B! error] issmのブックマーク

エラーメールの理由と対策を知りたい | さくらのサポート情報

さくらのレンタルサーバライトスタンダードプレミアムビジネスビジネスプロマネージドメールボックス —– The following addresses had permanent fatal errors —– <メールアドレス> (reason: 550 Host unknown) —– Transcript of session follows —– 550 5.1.2 <メールアドレス>… Host unknown (Name server: ドメイン名.: host not found) ********************************************** ** THIS IS A WARNING MESSAGE ONLY ** ** YOU DO NOT NEED TO RESEND YOUR MESSAGE ** **************

issm 2012/05/11

リンク

例外捕捉モジュール Try::Tiny のベンチマーク - Craftworks Tech Blog - Branch

Yuval Kogman 氏が Try::Tiny という新しい例外捕捉モジュールをリリースしたようなので、ベンチマークを取ってみました。ベンチマークコードは、Error.pm のオーバーヘッドで書いたものを流用しました。ベンチマークコード #!/usr/bin/perl use strict; use warnings; use Benchmark qw(:all); use Try::Tiny; use Error; cmpthese(timethese(100000, { 'eval' => sub { _eval(\&die_with_object); _eval(\&die_with_string); _eval(\&dont_die); }, 'try' => sub { _tiny(\&die_with_object); _tiny(\&die_with_string);

issm 2010/02/14

リンク

Error.pm - 日向夏特殊応援部隊

挙動確かめる用。ちなみに Exception::Class だと pacakge をわざわざ明示的に割り当てる必要は無い。 #!/usr/bin/perl package ThrowableProcess::Exception; use base qw(Error::Simple); package ThrowableProcess::FirstException; use base qw(ThrowableProcess::Exception); package ThrowableProcess::SecondException; use base qw(ThrowableProcess::Exception); package ThrowableProcess; use strict; use warnings; use Carp::Clan; use Error qw(:try);

issm 2010/01/27

リンク

Perl/codepiece/try-catch-exception01 - Glamenv-Septzen.net

id: 116 所有者: msakamoto-sf 作成日: 2007-03-14 22:47:19 カテゴリ: Perl [ Prev ] [ Next ] [ Perl ] Perl(正確にはPerl5.X系列まで)にはtry-catch構文は存在しない。しかし、evalやcoderefを引数にとることができるなどの特徴を用い、幾つかの疑似try-catch的テクニックは存在する。Error.pmとうモジュールも公開されており、こちらを活用するとOOP的なtry-catchを実現できる。参考ページ： Error.pm http://search.cpan.org/~shlomif/Error-0.17008/lib/Error.pm http://www.perl.com/pub/a/2002/11/14/exception.html http://www.perl.com/pub/

issm 2010/01/27

リンク

メモ: Error.pm でサブクラス化した例外を投げる - kazuhoのメモ置き場

例外を投げるときは $obj->throw。ベースクラスは Error::Simple。 try { MyException->new("hello world")->throw; } catch MyException with { my $e = shift; print "$e\n"; }; package MyException; use base qw(Error::Simple); みたく書く、色々教えてもらった結果理解した。miyagawa++ tokuhirom++ 8/28追記: ちなみに Error::Simple がセットする $@ は例外として送出されるオブジェクトで、かつ Error::Simple は stringify をオーバーライドしているので、eval を使って例外監視している場合もちゃんと動く。 eval { MyException->new("hel

issm 2010/01/27

リンク

ねこトトラ: Perlで例外処理

サイトメニュー EBS Eternal Champion EC 説明書 EC 掲示板チャット EBS改造イラスト系東方アイコン CG Gallery 小悪魔表情集 Game & SRC 博霊散歩東方煌十夜（途上）リリーシナリオ弾幕インクルード東方ネタ東方名前録最強ランキング幻想郷チーム編成アプリ、ライブラリ MjQuickView MjClickLog DxLib for C# SRCデータエディタ C#マウスジェスチャ Perlページモジュールその他のネタハーツ拡張ルール RPG16ステータスアニメレビュー昔の企画用語辞典リレー小説リンク通常 CGサイト Web関連おすすめ書籍情報掲示板このサイトについて自己紹介 « 東方煌十夜リリーシナリオ仮公開版（5話まで） | メイン | ページをめくるモジュール » 2006年01月19日 Perl

issm 2010/01/27

リンク

Perl のローレベルエラー処理 (もしくは Errno.pm のススメ) - JPerl Advent Calendar 2009

Perl のローレベルエラー処理 (もしくは Errno.pm のススメ) - JPerl Advent Calendar 2009 Perl に関するちょっとした Tips をのっけてみるよ。ちゃんと続くかな？例えば、「ディレクトリが存在しなければ作成」という処理を書くことを考えてみます。 if (! -d $dir) { mkdir $dir or die "failed to create dir:$dir:$!"; } でいいしょうか？　いえ、違います。これだと、-d 演算子でディレクトリの不存在を確認した後、mkdir を呼ぶまでの間に他のプロセスがディレクトリを作成してしまう可能性があります。なので、たとえば C ならば、 if (mkdir(dir) != 0 && errno != EEXIST) { fprintf(stderr, "failed to create d