[Cascavel-pm] webcrawler usando Socket

[Flavio S. Glock]

Aí vai a minha tentativa - alguém poderia testar quanta memória é usada?

    use Net::Telnet ();
    $t = new Net::Telnet ( Port => 80, Prompt => '/\n/', Host =>
'www.google.com' );
    $t->print("GET http://www.google.com/ HTTP/1.1\nConnection: close\n\n");
    print $t->getlines;

- Flavio S. Glock