Chakotay
07-07-2006, 11:52
hab im perl-script nen teil der gucken soll ob ne bestimmte datei da ist oder nicht
wenn die datei da ist soll er den einen befehl ausführen (hier:IRC:: print("\"$filename\""); )
wenn die datei nicht da ist nen anderen (hier:IRC:: print("\"Datei nicht gefunden\""); )
das mit dem nach ner datei suchen und wenn ja den ersten befehl auszuführen funktioniert schon prima
sub suche_nach_popup_conf
{
use File::Find;
find(\&wanted, $HOME);
}
sub wanted {
if (/popup.conf/) {
$filename=$_;
IRC::print("\"$filename\"");
}
}
leider hab ich keine ahnung wie der zweite teil aussehen muss damit er dem zweiten befehl ausführt wenn die datei nicht da ist :-(
bin für jede hilfe dankbar :-)
wenn die datei da ist soll er den einen befehl ausführen (hier:IRC:: print("\"$filename\""); )
wenn die datei nicht da ist nen anderen (hier:IRC:: print("\"Datei nicht gefunden\""); )
das mit dem nach ner datei suchen und wenn ja den ersten befehl auszuführen funktioniert schon prima
sub suche_nach_popup_conf
{
use File::Find;
find(\&wanted, $HOME);
}
sub wanted {
if (/popup.conf/) {
$filename=$_;
IRC::print("\"$filename\"");
}
}
leider hab ich keine ahnung wie der zweite teil aussehen muss damit er dem zweiten befehl ausführt wenn die datei nicht da ist :-(
bin für jede hilfe dankbar :-)