harvey.oswaldt: linuxbefehl 'wget' aufrufen mit qx() und Ergebnis abfangen?

hallo
habe ein Perl-Problem. zB. möchte ich von einem Server alle Screenshots einer LAN-Party runterladen, dazu bastel ich mir eine for-Schleife und habe einen Konstrukt der etwa so aussieht ($number ist die Schleifenvar.):

$url = "http://server/screenshot".$number.".jpg";
 $succeed = qx (wget $url -q)
 print $succeed;

qx() wird zwar wunderbar ausgeführt, ich möchte aber das Ergebnis abfragen, in der Form daß er zurückgibt ob es erfolgreich war. in dem Beispiel oben wird in $succeed gar nichts zurückgegeben. wäre auch schön, wenn ich den Zustand abfragen könnte, wenn es zu lange dauert und er zB. nach 10 sec. abbricht. Weiss jemand ne Lösung?
danke gruß

  1. Ich grüsse den Cosmos,

    $succeed = qx (wget $url -q)

    damit bekommst du ja auch nur zurück, was wget an Ausgaben produzieren würde. Probier mal

    $succeed = qx / wget $url -q; echo $? /

    Zumindest das echo gibt dir den Status des letzten Kommandos zurück.

    Möge das "Self" mit euch sein

    --
    Fragt ein Atom das andere: Hast du mein Elektron gesehen? Ich bin heute so positiv.
    ie:{ br:> fl:| va:| ls:& fo:{ rl:( n4:{ de:] ss:) ch:? js:| mo:) sh:( zu:)
  2. Moin Moin!

    Benutze LWP::Simple. Die getstore()-Funktion macht das, was Du haben willst, nur schneller, sicherer und sauberer.

    Alexander

    --
    Today I will gladly share my knowledge and experience, for there are no sweeter words than "I told you so".