in reply to Normal regexes stop working

Use Data::Dumper to print these values and set $Data::Dumper::Useqq=1. You will see exactly what is in those strings, complete with invisible characters, tabs or spaces...

Replies are listed 'Best First'.
Re^2: Normal regexes stop working
by yegg (Acolyte) on Oct 24, 2010 at 20:58 UTC
    OK, did that.

    Here was the printout from the first failure after making that change: 

    warn qq(\nDILBERT 1a: "), Dumper($q_meta), " ", Dumper($page_title) if
+ $is_dilbert;

DILBERT 1a: "$VAR1 = "Haji\\ Ayub\\ Afridi";
 $VAR1 = "Haji Ayub Afridi";"

    [download]
[reply]
[d/l]
      Thx--I haven't figured out the error yet, but I did make some progress.

      I found that if $q was set to $VAR1 = "\n\302\240"; the time before then it doesn't work thereafter.

[reply]

In Section Seekers of Perl Wisdom