Select Code to Download

$app_insert = $dbh->prepare("INSERT INTO bitium_apps(id, app_slug, app
+_Name, 
team_id, provider_id, provider_slug, provider_saml, config_saml, confi
+g_login, 
...
  my $unjson=$json->allow_nonref->decode($api_results);
  for my $row (@$unjson) {
    my @insert;

for my $var (qw/.id .slug .name 
                    .provider.id .provider.name
...
                    .configuration.login .configuration.url .created_a
+t
                    .status .key_vault .requires_mfa_code .configurati
+on.install_type
                   /){

     $base=$base->{$subpart}; 
        }

   push @insert,$base->{$terminal};
      }  # var

 $app_insert->execute(@insert[0,1,2,4 .. 15]) or die $app_insert->errs
+tr;
    } # row