i think this might just work... (i will keep my fingers crossed)

use IO::Socket;
use strict;
my $socket=new IO::Socket(
                            PeerAddr=>$host,
                            PeerPort=>80, #HTTP
                            Proto=>'tcp',
                         ) or die "cannot create socket\n";
#print the input to the socket
print $socket "<your get command here">;
#read the input from the socket
my $data=<$socket>;
print $data;
print $socket "<your post command here>";
close $socket
[download]

$host is the IP address of the required host
the thing is to connect to port 80 and do simple HTTP requests.......
the print statement prints the request to directly to the socket and then it is directly read from the socket
you can even loop indefinitely if you want..... giving an terminating condition....

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.