C:\temp>myScript.pl
Doing some work --> Done.
Doing some ping --> Done.
Doing something else --> Done.
Number of machines to be LAPC'd (178) below threshhold (700), please investigate
! at I:\perl\lapc.pl line 41.
Checking Threshold -->
C:\temp>