Re^2: How we can separate a backref from a digit?

It looks good. By the way:

$a=1;
print "Match\n" if "aa1" =~ /^(a)\1$a$/; # not match!
[download]

After interpolation of variables we get the false backlink \11! To all: should I submit a bug report to perl.org?
Serge

Comment on Re^2: How we can separate a backref from a digit? Download Code

Replies are listed 'Best First'.
Re^3: How we can separate a backref from a digit? by ikegami (Patriarch) on Mar 18, 2011 at 07:59 UTC
Not a bug.	[reply]
Re^4: How we can separate a backref from a digit? by Serge314 (Acolyte) on Mar 18, 2011 at 08:06 UTC
It's an unexpected result.	[reply]
Re^5: How we can separate a backref from a digit? by Jenda (Abbot) on Mar 18, 2011 at 11:13 UTC
Unexpected to you. Variable interpolation happens before the regular expression is parsed and compiled so there is no difference between `$a=1; print "Match\n" if "aa1" =~ /^(a)\1$a$/; # not match!` [download] and `print "Match\n" if "aa1" =~ /^(a)\11$/; # not match!` [download] or `$a='\11'; print "Match\n" if "aa1" =~ /^(a)$a$/; # not match!` [download] If it did not work like this you could not build regular expressions out of parts stored in variables. Jenda Enoch was right! Enjoy the last years of Rome.	[reply] [d/l] [select]
Re^6: How we can separate a backref from a digit? by Serge314 (Acolyte) on Mar 21, 2011 at 10:29 UTC
Re^5: How we can separate a backref from a digit? by ikegami (Patriarch) on Mar 18, 2011 at 08:14 UTC
What would you expect `'\1'.'1'` to give?	[reply] [d/l]