Select Code to Download

if (open my $fo, '<', $ggg) {
    # Process the file.
} else {
   # Your code to exit.
}

{
    print "'$ggg' is missing:\nEnsure that this file is in the working
+ dir.\nWe are exiting.\n";
...
    }
    exit;
}