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.
  • # Why not just

    use overload(
        '=='   => "num_eq",
        '!='   => "num_ne",
        '>='   => "num_ge",
        '>'    => "num_gt",
        '<='   => "num_le",
        '<'    => "num_lt",
        'eq'   => "str_eq",
        'ne'   => "str_ne",
        'ge'   => "str_ge",
        'gt'   => "str_gt",
       
    • That's how the code was originally written. Switching from code references to strings makes this all go away. It's such a force of habit for me to use code refs that I feel really, really stupid about now :)

      • That makes sense. Using a coderef ends up being like Ben's original idea: when you do $bool = \&Foo::Bar::bool and then $obj->$bool() you get the same thing as $obj->Foo::Bar::bool() instead of $obj->bool().