{
	local *SESAME;		# localizing a filehandle saves debugging time too
	open (SESAME, $file) || die "Foo: $!";
	local $/ = "\n\n";	# "line" delimiter is now two newlines
	@lines = <SESAME>;
	close (SESAME) || die "Bar: $!";
}