in reply to Perl script asking question and staying in a loop

It looks like you just want to have a infinite loop? So, replace this 
$COUNT = 1;
while ($COUNT = 1)

[download]
with this? 
while (1)

[download]

In Section Seekers of Perl Wisdom