Help for this page

Select Code to Download


  1. or download this
    my $cmd = "$baseURL/$command?" .
      join( '&', map { "$_=" . uri_escape( $parameters->{$_} ) } 
        keys %$parameters );
    
  2. or download this
    my $request = HTTP::Request->new( 'GET', $cmd, [ 'Host', $host ] );
    $request->protocol('HTTP/1.1');
    
  3. or download this
    my $agent = LWP::UserAgent->new();
    my $response = $agent->request($request);