Supportnet / Forum / Skripte(PHP,ASP,Perl...)
Batchfiles in Perl
Frage
Hallo,
In meinem Skript sollen Datenbankbefehle (db2) verarbeitet werden. Bisher geschieht das folgendermassen:
`su - $key < /usr/local/bin/db2reorgchk.in > /dev/null`; ($key ist der Datenbankuser)
Die Datei db2reorgchk.in sieht so aus:
MLOG=/var/vi/db2reorgchk.log
db2 connect to objbswt2
db2 "reorgchk update statistics on table all">>$MLOG
db2 terminate
exit
Ich möchte diese Befehle "innerhalb" des Skriptes ausführen können, also keine externe Datei verwenden. Wenn ich nun sage `su - $key db2 connect to objbswt2`, dann funktioniert das nicht, da der Access verweigert wird.(Rechtesache)
Wer hat eine Lösung parat? Hat das Modul MARC::Batch irgendwas damit zu tun?
Vielen Dank im Voraus!
Antwort 1 von sst
man expect
oder bau die zeilen mit \n auf bevor du die ersten daten sendest...
schau auch mal bei www.cpan.org vorbei:-)
gruss,
sst
oder bau die zeilen mit \n auf bevor du die ersten daten sendest...
schau auch mal bei www.cpan.org vorbei:-)
gruss,
sst