local $/;  # Added in an update
	my $file = <IN>;
	while( $file=~/$regex/gm ) { ... }