> > package Manko;
> > sub new {
> >  my( $class ) = @_;
> >  bless $class;
> > }
> > sub manko {
> >  print "manko";
> > }
> > 便利なクラスを作ってみました。ぜひ利用してください
> use Manko;
> $manko = Manko::new();
> $manko->manko() while 1;

貴殿は無限Loopが好きすぎる

参考：2003/11/02(日)01時28分56秒