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.
  • It seems like this would be less difficult if he didn't use Class::Std. A normal hash-based object makes it look simpler to me anyway:

    push @{ $self->{'files'} }, @more_files;
    • Throwing in an extra arrow makes it look simpler? Strange definition of simpler. :-)

      I like to preface my inside-out object methods with “my $this = ident my $self = shift;”, btw, which makes that code into this:

      push @{ $test_files{ $this } } , @failure_files;

      Of course Hash::Util::FieldHash [cpan.org]’s idhash function will make that separate $this unnecessary in 5.10 and you’ll be able to just write this:

      push @{ $test_files{ $self } } , @failure_files;

      The real problem persists thro