The first problem with your code is that it does not compile. You have an unbalanced paren in line 64.

And you are calling a subroutine debug in line 47 which doesn't exist.

And the hash $active_threads{@row} is never declared....along with:

Global symbol "$deleteLimit" requires explicit package name at C:\test
+\1138490.pl line 12.
Global symbol "$environment" requires explicit package name at C:\test
+\1138490.pl line 12.
Global symbol "$maxThreads" requires explicit package name at C:\test\
+1138490.pl line 12.
Global symbol "$debug" requires explicit package name at C:\test\11384
+90.pl line 12.
Global symbol "$cwm_db" requires explicit package name at C:\test\1138
+490.pl line 15.
Global symbol "$cwm_host" requires explicit package name at C:\test\11
+38490.pl line 15.
Global symbol "$cwm_user" requires explicit package name at C:\test\11
+38490.pl line 15.
Global symbol "$cwm_pass" requires explicit package name at C:\test\11
+38490.pl line 15.
Global symbol "$deleteLimit" requires explicit package name at C:\test
+\1138490.pl line 18.
Global symbol "@row" requires explicit package name at C:\test\1138490
+.pl line 26.
Global symbol "%active_threads" requires explicit package name at C:\t
+est\1138490.pl line 28.
Global symbol "@row" requires explicit package name at C:\test\1138490
+.pl line 28.
Global symbol "@row" requires explicit package name at C:\test\1138490
+.pl line 28.
Global symbol "$maxThreads" requires explicit package name at C:\test\
+1138490.pl line 31.
Global symbol "%active_threads" requires explicit package name at C:\t
+est\1138490.pl line 32.
Global symbol "%active_threads" requires explicit package name at C:\t
+est\1138490.pl line 33.
Global symbol "%active_threads" requires explicit package name at C:\t
+est\1138490.pl line 34.
Global symbol "%active_threads" requires explicit package name at C:\t
+est\1138490.pl line 35.
Global symbol "$api_creds" requires explicit package name at C:\test\1
+138490.pl line 46.
Global symbol "$cwm_url" requires explicit package name at C:\test\113
+8490.pl line 46.
Global symbol "$ua" requires explicit package name at C:\test\1138490.
+pl line 50.
Global symbol "$ua" requires explicit package name at C:\test\1138490.
+pl line 55.
Global symbol "$deviceLogDIR" requires explicit package name at C:\tes
+t\1138490.pl line 73.
Global symbol "$reportDate" requires explicit package name at C:\test\
+1138490.pl line 73.
Global symbol "$deviceLogDIR" requires explicit package name at C:\tes
+t\1138490.pl line 76.
Global symbol "$deviceLogDIR" requires explicit package name at C:\tes
+t\1138490.pl line 76.
Execution of C:\test\1138490.pl aborted due to compilation errors.
[download]