Don't forget last element

diff --git a/masterlist2mirmon b/masterlist2mirmon
index 60a08f3..0195492 100755 (executable)
--- a/masterlist2mirmon
+++ b/masterlist2mirmon
@@ -25,6 +25,8 @@ while (my $line = <$fh>) {
     }
 }
 
+push @mirrors, $data if $data;
+
 foreach my $mirror (@mirrors) {
     my ($c, $r) = split (/ +/, $mirror->{'country'});
     printf ("%s http://%s%s\n", $c, $mirror->{'site'}, $mirror->{'grml-http'});