use LWP::UserAgent;
use HTTP::Request::Common;
use CGI;
use strict;

my $agent = LWP::UserAgent->new;
my $data = $agent->request(POST 'www.somewhere.com', [%original_CGI_Params]);

#then print the data with CGI

##</code><code>##

print $cgi_query->redirect(POST 'www.somewhere.com', [%params]);