Select Code to Download

my $up = "UPDATE Prior_to_CI_calc_A_$region 
            SET SUM_wi           = $SUM_Weight_wi, 
...
            WHERE     A.Aggregated_area LIKE '$Aggregated_area_fill' 
                  AND A.Cause LIKE '$Cause_fill'
";

  sub update_region {
    my ($region) = @_;
...
  my $query = $dbh->prepare(update_region($region));

  $query->execute(1,2,3,'US','unknown');