http://qs321.pair.com?node_id=1034842


in reply to The simplest possible pattern match defeats me

I'm confused!

Your code and your error-msgs don't seem to match.

Where is the pattern match (m//) line 103 ?

You are identifying :

if ($oldString eq "Automated") { # Line 103, the one that gives all the trouble.

which doesn't have a regex but an eq!

Furthermore this can't be line 103, if your output just 4 lines before logs DEBUG main:::84:.

Could it be that you are chasing at the wrong place?

Cheers Rolf

( addicted to the Perl Programming Language)