"be consistent" | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
You are trying to use $1 after a failing match, so basically you deserve whatever's coming to you ;) The contents of the ${\d+} variables are only well-defined if the last (capturing) match was successful. The fact that you were getting the old value was lucky. You should just save $1 after a successful match if you will need it later:
This produces the output you want. Speculation: As for why it's doing this, I have a guess that as the regex engine goes left to right across the string, it starts matching and filling up the buffer for $1 with uppercase characters, clobbering what was in it before. It doesn't fail until it gets to a lowercase character (when the regex is expecting the end of string), but $1 is already trashed. When the non-matching strings in your __DATA__ started with lowercase letters, the regex could fail before even trying to fill the buffer for $1, so it was not clobbered and the old value remained. Why you still ended up getting exactly the old first character though is a mystery to me. blokhead In reply to Re: What's happening to my $1?
by blokhead
|
|