#!/usr/bin/perl use CGI; use URI; $q = CGI->new; $user = $q->param('user'); $uri = URI->new; $uri->scheme('http'); $uri->host('www.mywebsite.com'); $uri->path("/users/$user"); print $q->redirect( -uri => $uri->as_string ); exit;