my $URL = "http://localhost/index.shtml";
print "Status: 302 Found\n";
print "Location: $URL\n\n";
exit;
##</code><code>##

Necessary .htaccess file changes:
RewriteEngine on
RewriteRule welcome.shtml /cgi-bin/welcomeV01.pl [L]

Perl file code:
my $URL = "http://localhost/index.shtml";
print "Status: 302 Found\n";
print "Location: $URL\r\n\r\n";
exit;