Help for this page
CLIENT.pl #!/usr/bin/perl ... print FILE <$sock>; } close(FILE);
#!/usr/bin/perl use strict; ... print $conn $x; } }