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.
  • The expression you're supplying to the debugger is being parsed as a block:

    tony@zeus:~$ perl -MO=Deparse -e '{%$r}{@f}'
    {
            %$r;
    }
    {
            @f;
    }
    -e syntax OK

    eval()ling the same expression gives the result you saw in the debugger:

    tony@zeus:~$ perl -e '$r = { this => "that", these => 17 }; @f = qw(this these); @foo = eval q"{%$r}{@f}"; use Data::Dumper; print Dumper \@foo'
    $VAR1 = [
                        'this',
                        'these'
                    ];

    • Ah! Thank you for the explanation!

      --
      J. David works really hard, has a passion for writing good software, and knows many of the world's best Perl programmers