Fix a stray $.

I get warnings about `Use of uninitialized value $. in pattern match (m//) at (eval 278) line 5` when using Moops with `-w`. Pretty sure that this is the culprit, and I'm pretty sure that this `$.` just got lost in 0.003's `$.`-to-`$_`-athon.