#!/usr/bin/env perl use v5.36; use strict; use warnings; use Carp; open(my $ifh, '<', 'doesnotexist.dat') or croak($!);