A couple of other points, additionally to what shmem has already pointed out:
I think you want something along the lines of $ARGV[0], as @ARGV is the argument vector (read "array") passed to your Perl script, -not- a scalar.
It looks like you're missing a quotation mark in: /^TEOJ=-w"/ (see where?)
You can use '|' in regular expressions like this: if /^(JRECOV="yes"|TEOJ="-w")/. But it's usually faster to do it with multiple conditionals like: <c>if ($_ eq 'JRECOV="yes"' or $_ eq 'TEOJ="-w"'), especially if you have lots of patterns to match.