doubt in code

[Irfan J Sayed (isayed)]

Hi All,
 
I have sample code like this:
 
#!/usr/bin/perl

# file: lgetr.pl

# Figure 1.2: Read the first line from a remote server

use IO::Socket;

my $server = shift;

my $fh = IO::Socket::INET->new($server);

my $line = <$fh>;

print $line;

As per comment it says that, it prints the first line of a file from
remote server. So my understanding is that, it will go to remote
server,read the file and then prints the first line of a file on the
existing console. is it right ?? if yes then in the code where are we
giving the filename??

Please suggest.

Regards

Irfan.