From 1b2fa6aaa36c4521736bb85e698ef6eb9a7ae0de Mon Sep 17 00:00:00 2001 From: Christian Pointner Date: Wed, 5 Sep 2012 21:37:14 +0000 Subject: added 'last' after successfull download for DN! diff --git a/rhimport-dn b/rhimport-dn index 0f35ae7..d155eb2 100755 --- a/rhimport-dn +++ b/rhimport-dn @@ -117,6 +117,8 @@ for my $entry ($files_feed->entries) { print $1 . ": downloading " . $entry->enclosure->url . " (" . $entry->enclosure->length . " Bytes) .. "; $file = $ff->fetch( to => '/tmp' ) or die $ff->error; print "ok\n"; + + last; } } } -- cgit v0.10.2