Select Code to Download

sub tb_data_lnk_open 
{ 
...

return 0; 
}

sub tb_data_recv 
{ 
...
# print "\nTimeOut Not Detected"; 
return $data; 
}