if (-e $file && open (my $AFILE, "<$file")) { ...