Help for this page

Select Code to Download


  1. or download this
    use strict;
my $file = "";
...
print "\n\nIl prossimo campo disponibile e: $ProssimoCampo\n\n";
}
#END
  2. or download this
    my $hostname = `hostname`;
my $Environment;
...
@Databases = ("2","27","37");
$AdabasScriptDir = "/opt/app1vg/appl/script/Utility/sag/adabas/";
}
  3. or download this
    %Databases (
"2" => (@ElencoCampiOrdinati), ($ProssimoCampo)
"27" => (@ElencoCampiOrdinati), ($ProssimoCampo)
"37" => (@ElencoCampiOrdinati), ($ProssimoCampo)
)