if ( !defined(my $pid = fork())) {
	print STDERR "fork error\n";
	exit(1);
}
elsif ($pid == 0) {
	close(STDOUT);close(STDIN);close(STDERR);
	system("perl", "./backend.pl");
	}

else {
	print "<br><br>Thanks for your patience.";
	exit 0;
}