Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • Just add can_any() in a patch to UNIVERSAL::can, and use Test::MockObject and you're set. ;-)
    • by Ovid (2709) on 2007.08.14 12:57 (#56973) Homepage Journal

      Personally, I think if anyone wants generic functionality like this they should put it in something like a My::UNIVERSAL class and have all objects inherit from that instead. That way, you don't risk breaking CPAN classes which, by default, inherit from UNIVERSAL.