Select Code to Download

die("Cannot open weekly_${store}_pdf.sas to read from ")
   unless(open(FINAL, ">weekly_${store}_pdf.sas"));

open(my $fh_final, '>', "weekly_${store}_pdf.sas")
   or die("Unable to open weekly_${store}_pdf.sas for writing: $!\n");