if($_ =~ /Beginne.*pid=(\d+)/)
{
	$pid=$1;
}