Read the first line from a remote server : Client « Network « Perl

1. Perl
2. Network
3. Client

Read the first line from a remote server

    



#!/usr/bin/perl


use IO::Socket;

my $server = "localhost";
my $fh     = IO::Socket::INET->new($server);
my $line   = <$fh>;
print $line;

   
    
    
    
  

Related examples in the same category