BTW, after the update, runiing the perl script on the command line gets this, which is pretty much the same except the 1st line:
Global symbol "$PAnon" requires explicit package name at subscriptions.pl line 90.
Global symbol "$Pnumber" requires explicit package name at subscriptions.pl line 90.
Global symbol "$Pnumber" requires explicit package name at subscriptions.pl line 91.
Global symbol "$PAnon" requires explicit package name at subscriptions.pl line 92.
Global symbol "$PAnon" requires explicit package name at subscriptions.pl line 93.
Execution of subscriptions.pl aborted due to compilation errors.