use LWP::Simple;
my $query = new CGI;

my $script = "http://Benutzername:Kennwort\@192.168.0.2/cgi-bin/".$query->param('script');
getprint($script);