if($opt{ack} =~ /^\d+$/){
  print $live_socket chr($opt{ack});
}
else{
  print $live_socket $opt{ack};
}