C:\Users\ikegami>perl a.pl
At printer 2 0
At printer 93 0
At printer 94 0
At printer 60 0
At printer 26 0
At printer 83 0
At printer 65 0
At printer 45 0
At printer 8 0
At printer 20 0
At printer 7 0
At printer 47 0
At printer 53 0
At printer 22 0
At printer 26 0
At printer 22 0
At printer 24 0
At printer 51 0
At printer 13 0
At printer 100 0
...

##</code><code>##

This is perl 5, version 16, subversion 3 (v5.16.3) built for MSWin32-x64-multi-thread