On Thursday 01 May 2008 20.06.52 Eirik Berg Hanssen wrote: > What precisely must "something()" be? I tried the following:
> So. Where do I look? Here is the (simplified) code that would generate the warning I thought was a problem (read below) my ($search_regex, $replacement_regex) = (qr/l/, '$2') ; my $text = 'l' ; eval "\$text =~ s/$search_regex/$replacement_regex/ ;" ; But I was completely mistaken! I blindely thought the problem was in "warning_like {...}" but it was the previous test! Thanks to your help (and trying to reproduce the error in simpler code) I have found an error in my testing and in the silly I used to fix it. Note that: warning_like { warn "1\n2\n3" ; } qr/1\n2\n3/ ; still doesn't work properly. Cheers, Nadim.