to client:'1:AAE/LxI1l9kvzveExnBSsku783Z+1mWYld/J7G3nl/OijlRXuIZXDKcHQDTlkIB52p/qxiFohG76Jxhb1F64oyPpom24PO7RVvKb4jQkOoi4xNbBwSbvMUsq1ZnqNP95vz2ifeWzqqPmR9XRS7OfbgZSK8X3le/YP/Ca8Mj5K90aJ7oYF2HaeJFotVeCO9eLpS5zlH02gGMADCfS+ZXwN4420u/fwevNrBMx/cSeCVtcocS6i3wPNlJKA'
##</code><code>##

 my $sql="SELECT data FROM firmware_data WHERE firmware_key = '$firmware_key' AND row_number = $current_row";
$self->log(4, "select: $sql");
$sth=$dbh->prepare($sql);
$sth->execute;
$firmware_packet=$sth->fetchrow();
$sth->finish();

if (defined($firmware_packet) ){
  $IdleUserTimeout=0;     #reset the timer since we got some user data
  $self->log(4,"firmware row: $current_row");

  #send the data
  $self->log(4, "firmware to client:'$current_row:$firmware_packet'");
  print "$current_row:$firmware_packet\r\n";
  if ($current_row < $data_NumberOfRows){
    $current_row++; #get the next packet net time around
  }
  if ($firmware_packet =~ /^#bye$/){
    #we recived the BYE command, so inform the client and close the socket down
    log_user_out($self, $dbh, $MAC);
    return;
  }

  select(undef, undef, undef, .5); #500ms