perl -MCGI -e 'print CGI->new({})->redirect("/foo/b ar.cgi");'