my $myClient = 97;
my $deliverymethod = 'USPS';
my $sql = read_file("$ref->{config}->{SQLDIR}/USPS.sql");

   &getOrders($ref,$sql,$myClient,$deliverymethod);

   sub getOrders {
      my $ref = shift(@_);
      my $sql = shift(@_);
      my $myClient = shift(@_);
      my $deliverymethod = shift(@_);

      my $query = $dbh->prepare($sql);
      push(@ARRAY,$deliverymethod);
      # have to put this var in array twice
      #  because we reference it twice
      push(@ARRAY,$myClient);
      push(@ARRAY,$myClient);
      $query->execute(@ARRAY);
   return;
 }