From e558d783acc34e38898e3a9aa84053d0b0ec0e49 Mon Sep 17 00:00:00 2001
From: Jonas Meier <meiers.jonas@gmail.com>
Date: Sun, 17 May 2020 22:56:22 +0200
Subject: [PATCH] new code snippet from ms, works perfect

---
 rsync-timefilter.pl | 23 ++++++-----------------
 1 file changed, 6 insertions(+), 17 deletions(-)

diff --git a/rsync-timefilter.pl b/rsync-timefilter.pl
index 4873924..aa9b1fd 100755
--- a/rsync-timefilter.pl
+++ b/rsync-timefilter.pl
@@ -30,20 +30,9 @@ my @files = grep {
 
 #use DDP; p @files;
 
-my @includes;
-#my @rsyncincludes;
-
-my $file;
-foreach $file (@files)
-{
-  #print "$file->{name}\n";
-	push @includes, "$file->{name}";
-	#push @rsyncincludes, "--include $file->{name},";
-	#push @rsyncincludes, "include=>$file->{name}",;
-}
-
-#print "@rsyncincludes\n";
-
-$rsync->exec(src => 'planet.openstreetmap.org::planet/planet/', dst=>'/tmp/rsynctest', include=>"@includes") or warn "rsync failed\n";
-
-#$rsync->exec(src => 'planet.openstreetmap.org::planet/planet/', dst=>'/tmp/rsynctest', @rsyncincludes) or warn "rsync failed\n";
+$rsync->exec(
+		src     => 'planet.openstreetmap.org::planet/planet/',
+		dst     => '/tmp/rsynctest',
+		include => [map { $_->{name} } @files],
+		exclude => ['*'],
+);