Solved

Sockets

Posted on 1998-12-05
4
672 Views
Last Modified: 2010-05-18
Hello,
I've found this in a book, but can't get it to work.

Code:
open_SOCKET($server, 80);
sub open_SOCKET {
  my ($server, $port) = @_;
  $port = getservbyname($port, 'tcp') if $port !~ /^[0-9]/;
  socket SOCKET, AF_INET, SOCK_STREAM, 0 or die "open socket: $!";
  connect(SOCKET, sockaddr_in($port, inet_aton($server)));
}

Error:
Argument "SOCK_STREAM" isn't numeric in socket
Argument "AF_INET" isn't numeric in socket

Output:
open socket: Unknown Error: 0x0000273c

Martin
0
Comment
Question by:martinag
  • 2
  • 2
4 Comments
 
LVL 84

Expert Comment

by:ozo
ID: 1206765
Did you
 use Socket;
to get the proper definitions imported?

0
 
LVL 4

Author Comment

by:martinag
ID: 1206766
No I didn't...Claim you points, ozo.

But why weren't AF_INET and SOCK_STREAM undefined?

Martin
0
 
LVL 84

Accepted Solution

by:
ozo earned 50 total points
ID: 1206767
With
  no strict 'subs';
an undefiled bareword is treated as if it were a quoted string
(the -w switch will warn you about these)
0
 
LVL 4

Author Comment

by:martinag
ID: 1206768
Ok, thanks.

Martin
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
SIMPLE Perl Regex 1 162
perl: Cleaning meta tags using RegEX 12 82
parse a file and get data out 11 80
Perl: How to add backslashes to every period in a string 1 36
A year or so back I was asked to have a play with MongoDB; within half an hour I had downloaded (http://www.mongodb.org/downloads),  installed and started the daemon, and had a console window open. After an hour or two of playing at the command …
In the distant past (last year) I hacked together a little toy that would allow a couple of Manager types to query, preview, and extract data from a number of MongoDB instances, to their tool of choice: Excel (http://dilbert.com/strips/comic/2007-08…
Explain concepts important to validation of email addresses with regular expressions. Applies to most languages/tools that uses regular expressions. Consider email address RFCs: Look at HTML5 form input element (with type=email) regex pattern: T…

820 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question