if (! -e $file) {
    die "Uhoh - '$file' does not exist.";
};

##</code><code>##

use Data::Dumper;
print Dumper \@file_info;

##</code><code>##

my $file = "C:\\boot.ini";
print $file;