Bad protocol 'tcp' with perl/lwp module connections

["Dirk Fokken, Cross Development" <dirk dot fokken at cross-development dot de>]

Running a cgi script like the following from the command line works pretty fine.

Running the same script from within the browser result in an error message like:

http://192.168.0.5/cgi-bin/lwp.cgi
> 500 Can't connect to search.cpan.org:80 (Bad protocol 'tcp')

The sample script:
------------------------------
#!/usr/bin/perl -w

use CGI qw(:standard);
 
print header();

  # Create a user agent object
  use LWP::UserAgent;
  $ua = LWP::UserAgent->new;
  $ua->agent("MyApp/0.1 ");

  # Create a request
  my $req = HTTP::Request->new(POST => 'http://search.cpan.org/search');
  $req->content_type('application/x-www-form-urlencoded');
  $req->content('query=libwww-perl&mode=dist');

  # Pass request to the user agent and get a response back
  my $res = $ua->request($req);

  # Check the outcome of the response
  if ($res->is_success) {
      print $res->content;
  }
  else {
      print $res->status_line, "\n";
  }
------------------------------

System versions are:

    Cygwin DLL version info:
        DLL version: 1.5.10

on 

    Windows 2000 Professional Ver 5.0 Build 2195

     + Apache/1.3.29 

Many thanks for help.

Kind regards,

Dirk


--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/