open(my $fh, 'somefile') || die $!;