PerlScript Error error '80004005' (in cleanup) Illegal division by zero /vars.asp, line 13