instanceof演算子を実装してみた。 Scalar::Util::Ref #!perl use strict; use IO::File; use instanceof; my $x = IO::File->new(); if($x << 'IO::Handle'){ print "$x is an instance of 'IO::Handle'\n"; } __END__ Scalar::Util::blessed()&isa()と比べ…