Select Code to Download

tos@homer ~/tos/tmp
# cat recip 
...
}

close ($socket);

tos@VRANZ /cygdrive/t/tos/tmp
# cat sndr 
...
$socket->flush();

close ($socket);

tos@VRANZ /cygdrive/t/tos/tmp
# perl sndr

tos@VRANZ /cygdrive/t/tos/tmp
#

tos@homer ~/tos/tmp
# perl recip
...
ls
recip  sndr  sndr~  x