>perl -e "use CGI qw( redirect ); print(redirect(-uri => 'http://www.example.com/page.html', -status => 301))"
Status: 301
Location: http://www.example.com/page.html