sql und perl

25/05/2009 - 22:16 von kikirita | Report spam
Hallo Zusammen,

ich bin neu auf diesem Gebiet und bin an einem perl script am
basteln,der auf die Datenbank zugreift und ein paar ànderungen vornimmt
und dazu hàtte ich eine Frage.Ich möchte für einen neuen(letzten)
eingefügten Element in meiner Liste den Eintrag "neu" in der Datenbank
bis zu dem nàchsten Element löschen.Habt ihr einigermaßen verstanden was
ich meine? Auf jeden Fall habe ich folgendes program geschrieben ,der
nicht làuft,wie es sein sollte.Kann mir jemand sagen,was ich falsch
gemacht habe oder wo mein Fehler liegt?

Danke im Vorraus.
Gruß kiki

So sieht mein Script aus:
while(@array=$sth->fetchrow_array){
$i=0;
while(@array1[$i])
{
$i=$i+1;
}
print"anzahl: $i ";
$letztesElement = $array1[$i-1];
$subquery=qq{
DELETE FROM INFORMATION
WHERE ORIG_ID=$array[0]
AND ID=$letztesElement
AND Info LIKE "neu"
};



print "letztes Element: $letztesElement";
for($k=0; $k<=$i-1; $k++){
if($letztesElement> $array1[$k]){
print "aktuelles Element: $array1[$k]";
}else{
$subquery=qq{
DELETE FROM INFORMATION
WHERE ORIG_ID=$array[0]
AND ID>$letztesElement
AND ID<$array1[$k]-1
AND Info LIKE "neu"
};
}
}
 

Lesen sie die antworten

#1 Stefan Hoffmann
26/05/2009 - 09:56 | Warnen spam
hallo,

kikirita wrote:
ich bin neu auf diesem Gebiet und bin an einem perl script am
basteln,der auf die Datenbank zugreift und ein paar ànderungen vornimmt
und dazu hàtte ich eine Frage.



http://www.sommarskog.se/mssqlperl/...tives.html
http://dbi.perl.org/

Ich möchte für einen neuen(letzten)
eingefügten Element in meiner Liste den Eintrag "neu" in der Datenbank
bis zu dem nàchsten Element löschen.


Da würde ich mir doch lieber ein Perl-NG aussuchen...

So sieht mein Script aus:
while(@array=$sth->fetchrow_array){ [..]


Meine Perl-Kenntnisse sind etwas wage, aber offensichtlich ist $sth wohl
nicht definiert, da nicht über irgendwelche uses importiert.


mfG

Ähnliche fragen