if ($pid = fork)
{
	# parent here.
}
elsif (defined $pid)
{
	#child here.
}