Hello, I've been teaching myself on how to code with perl. My current project that I am working on is socket programming. I would like to transmit a message from one server to another. When I attempt to execute my client code, the following error displays, "send: Cannot determine peer address at ./myfirstcallsock.pl line 11"
#!/usr/bin/env perl
use strict;
use warnings;
use IO::Socket;
my $sock1 = new IO::Socket::INET (
PeerAdder => '<REMOVED-FROM-PUBLIC>',
PeerPort => '7070',
Proto => 'tcp',
);
my $msg="Hello, the message was successfully sent!\n";
$sock1->send($msg);
close($sock1);The "<REMOVED-FROM-PUBLIC>" lists the destination address that I am attempting to connect to. I've moved this script on the same server and replace the ip address with '127.0.0.1" but I still get the same error. Any help is appreciated.
