move file expansion for checkl10n task to Perl script

I don't grok Gradle, but I can Perl ;-)

build.gradle

@@ -88,26 +88,9 @@ task publishDropboxFull(type: Copy, dependsOn: fullJar) {
 	into '/home/mitch/Dropbox/schnucki/knittr'
 }
 
-task checkl10n() {
+task checkl10n(type: Exec) {
 	description 'Check all localizations for missing property file keys.'
 
 	/* FIXME: all paths handcrafted, there should be a better way */
-	finalizedBy(
-		checkl10nSingle('src/main/resources/de/cgarbs/knittr/resource', 'MainWindow'),
-		checkl10nSingle('src/main/resources/de/cgarbs/knittr/resource', 'Project'),
-		checkl10nSingle('src/main/resources/de/cgarbs/knittr/resource', 'RenderException'),
-		)
-}
-
-def checkl10nSingle(path, prefix) {
-	description 'Check one localization for missing property file keys.'
-
-	return tasks.create("checkl10n /${path}/${prefix}", Exec) {
-		List args = [ 'tools/check-l10n.pl' ]
-		fileTree(dir: path).include("${prefix}*.properties").each {
-			File file -> args.add(file as String)
-		}
-
-		commandLine args
-	}
+	commandLine 'tools/check-l10n.pl', 'src/main/resources/de/cgarbs/knittr/resource/*.properties'
 }

tools/check-l10n.pl

@@ -3,12 +3,17 @@
 
 # check for missing localizations
 #
-# give all relevant files as parameters
+# give all relevant files as parameter-globs
+
+my @files;
+foreach my $glob (@ARGV) {
+    push @files, glob $glob;
+}
 
 my $allkeys = {};
 my $filekeys = {};
 
-foreach my $file (@ARGV)
+foreach my $file (@files)
 {
     open FILE, '<', $file or die "can't open `$file': $!";
     while (my $line = <FILE>)
@@ -30,7 +35,7 @@
 foreach my $key (@keys)
 {
     my @files;
-    foreach my $file (@ARGV)
+    foreach my $file (@files)
     {
 	if (not exists $filekeys->{$file}->{$key})
 	{