#!/usr/bin/perl -w
if(condition){
	exec '/usr/.../another.pl';
}
print "Location: http://test/ \n\n";

##</code><code>##

#!/usr/bin/perl -w
print "Location: http://test/ \n\n";
if(condition){
	exec '/usr/.../another.pl';
}