> > 関係ないが、Perlでもこのくらいのことはできるんやで
> > eval {
> >     $object = new Someclass::Class();
> > };
> > if ($@ && $@->instanceof("Exeption::OutOfMemory")) {
> >     $@->printExeption(STDOUT);
> > } elsif ($@ && $@->instanceof("Someclass::SomeExeption"))
> >     $@->printStackTrace();
> > }
> レッツビギンやで！

そやな！

参考：2001/03/27(火)19時21分42秒