# lots of code assumed before this line
my $oWkS = $oBook->{Worksheet}[$sheet] or die "sheet doesn't exist";

##</code><code>##

eval {
	open FILE, $file;
}
die "$file did not open for reading" if $@;

##</code><code>##

while (1) {
	next if $_ = 'just skip this';
	last if $_ = 'fatal exception';
}