in reply to strange subs
As others said, those $$ are prototypes. See perlsub. Don't use them unless you know what you do - see FMTYEWTK about prototypes.