Help for this page
{ local *INPUT; open (INPUT, "file.ext") or warn "Cannot open file: $!" && return; print while (<INPUT>); close INPUT; }
{ local *INPUT; if (open(INPUT, "file.ext")) { ... # print "Couldn't open file: $!"; # } }