I think this is nested loops..?? if I have another loop within this routine... how can I still get the while (1) loop to work..

my $n = 5; # do this 5 times every 12 hours
while (1) # loop forever
{
  my $time = time(); # keep track of when we start
  print $sock "$data\r\n";
  my @output = <$sock>;
$output = join('', @output);
$|=1;
while(<$sock>)
{
if ( $output is this)
[download]

cheers steve