$NetBSD$

Don't use bare variable for filehandle

--- fgallery.orig	2014-09-05 16:33:54.000000000 +0200
+++ fgallery	2015-10-02 11:10:05.000000000 +0200
@@ -680,8 +685,9 @@
   push(@{$json{data}}, \%data);
 }
 
-open(JSON, ">$out/data.json");
-print(JSON encode_json(\%json));
-close(JSON);
+my $JSON;
+open($JSON, '>', "$out/data.json");
+print($JSON encode_json(\%json));
+close($JSON);
 
 print("completed\n");
