while (1) {
	my $page = get "$pbase?page=$pcnt&pid=$pid";
	last if $page =~/No sorties/;
	# Store grabbed webpage into the file
	append_file( "c:/scr/$pid.txt", $page ) ;
	last if $page =~/"sid=$lproc"/;
	# Update page number and grab next.
	$pcnt++; 
};