Select Code to Download

#/usr/bin/perl -w

...
    $threadCONSOLE->WriteChar($statString, $threadStatusColumn, $statu
+sRow)
    #print "$threadname ended.\n";
}

C:\chas_sandbox>test.pl
    1/177  .    3/8         4/4         3/16
C:\chas_sandbox>