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.
  • I don't get a SEGV. I get an error that answers your question:

    $ ~/Sandpit/5100/bin/perl5.10.0 -e 'qr/^([\w|\.]+)\s+(?(\d+)\s+)?(\w+)\s+(?:(\d+)\s+)?([\w|\d|\.]+)$/;'
    Unknown switch condition (?(\d in regex; marked by <-- HERE in m/^([\w|\.]+)\s+(?( <-- HERE \d+)\s+)?(\w+)\s+(?:(\d+)\s+)?([\w|\d|\.]+)$/ at -e line 1.

    And that's on This is perl, v5.10.0 built for i686-linux