http://qs1969.pair.com?node_id=396709

stevenrh has asked for the wisdom of the Perl Monks concerning the following question:

Divine Monks, I currently have a file that is a list of HTTP statements. I want open a socket (or a socket for each HTTP statement), and print the http command:
GET http://website.org/session1?32612391862938&email=heythere%40dude.net /HTTP/1.0
so far, this is my direction...and this may be wrong (hence the post)
I plan to open the file
$file = '/home/steven/http.list'; open(INFO, $file); @lines = <INFO>; close(INFO);

then I was thinking use a "for, foreach"
foreach $i(@lines){

and this is where i need a socket???
I have heard that I could use IO::Socket, but not really knowing the semantics of perl, it's not quite as easy to piece together the scraps of sample code I've borrowed from all corners of the world....
here's my socket :
#!/usr/bin/perl -w use strict; use IO::Socket; my $sock = new IO::Socket::INET ( PeerAddr => 'website.org', PeerPort => '80', Proto =>'tcp', ); die "Could not create socket: $!\n" unless $sock; print $sock ""this is where i need my http statement to go (from the f +ile list"; close($sock);


my green horns are clearly poking through.....
I appreciate any help ..cheers..... stevenrh

UPDATE: Thanks all for your help, and for being so cool to a noob, who could've RTFM (for a while).
I really appreciate it