On the second trip through the loop, eval is passed this interpolated string:
$NB_ORA_CLIENT = client01That's the bareword that strict is complaining about. When Perl sees a bareword, it looks to see if it's a subroutine name (which is why "strict subs" applies to it) and tries a few other possibilities (like is it being used as a hash key). If it can't figure out what it's supposed to be, it falls back to treating it as a string (like a shell does). So the string "client01" gets assigned to the variable by eval, but Perl isn't happy about it.
Aaron B.
Available for small or large Perl jobs; see my home node.
In reply to Re^2: Why is my loop dropping alphabetic strings?
by aaron_baugher
in thread Why is my loop dropping alphabetic strings?
by DiabeticJim
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |