autodie

---

examples/advanced-perl/autodie.pl

#!/usr/bin/perl
use strict;
use warnings;

use autodie;

open my $fh, '<', 'data.txt';

print "ok\n";

Can't open 'data.txt' for reading: 'No such file or directory' at examples/advanced-perl/autodie.pl line 7