| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| Ausgewählter Eintrag: | Zur Liste |
<perl> init "DB"; $db=$_amount_all;
$db1=$_amount_all;
</perl>
| Alle Einträge zum Thema: | Zur Liste |
<perl> init "DB"; $db=$_amount_all;
$db1=$_amount_all;
</perl>
<perl> init "DB"; $db=$_amount_all; $kleinste="DB";
init "DB1"; $db1=$_amount_all; if($db1<$db) {$kleinste="DB1";}
init "DB2";
$db2=$_amount_all;
if($db2<$db1) {$kleinste="DB2";}
$dba="DB";
get"Id==* range=0,1", "DB","erg";
$anzahl=$_amount_all;
for(my $i=0; $i<8; $i+=1)
{
$datenb="DB$i";
get"Id==* range=0,1", "$datenb";
$anzahl2=$_amount_all;
if ($anzahl2 < $anzahl)
{
$dba=$datenb;
$anzahl=$anzahl2;
$anzahl2="";
}else
{
$dba=$dba;
$anzahl2="";
}
}
foreach $i("",1..8){
init "DB$i";
$anzahl{$_amount_all}=$_; # anzahl und nummer im hash speichern
}
$db_zum_nutzen=$anzahl{@{[sort {$a <=> $b} keys %anzahl]}[0]}; # kurzform für:
# $niedrigsterwert=$eintraege_sortiert[0]; #ersten (kleinsten) schlüssel speichern
# $db_zum_nutzen=$anzahl{$niedrigsterwert}; #dbnummer dazu raussuchen
#
#
@Sander
<perl>
foreach $i("",1..8){
init "richtig$i";
$anzahl{$_amount_all}=$_;
}
$db_zum_nutzen=$anzahl{@{[sort {$a <=> $b} keys %anzahl]}[0]};
out "kleinste Datenbank: $db_zum_nutzen";
</perl>
<perl>
foreach $i(1..8){
init "richtig$i";
$anzahl{$_amount_all}=$i;
}
$db_zum_nutzen=$anzahl{@{[sort {$a <=> $b} keys %anzahl]}[0]};
out "kleinste Datenbank: $db_zum_nutzen";
</perl>
| Liste der Einträge von 6600 bis 6750: | Einklappen | Zur Eingabe |
| Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge |
| © baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |