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