#!/usr/bin/perl -w
  use strict;
  use WWW::Curl::Lite;
  use WWW::Curl::Lite::Request;
                                                                                
  my $request1 = new WWW::Curl::Lite::Request;
  $request1->url('http://oook.de');
  my $request2 = new WWW::Curl::Lite::Request;
  $request2->url('http://files.oook.de');
  my $curl = new WWW::Curl::Lite;
  $curl->register($request1);
  $curl->register($request2);
  my $responses = $curl->request;
  foreach my $response (@$responses) {
      print $response->content;
  }