Switch metas back to printing to stdout.

1 files changed, 1 insertions, 3 deletions

diff --git a/metas/perl b/metas/perl
index e136090..23f4907 100755
--- a/metas/perl
+++ b/metas/perl
@@ -89,8 +89,7 @@ sub main
 	}
 	fetchdist($cpath);
 
-	open my $fh, '>', 'PKGDATA' or die "open: $!";
-	print $fh <<"END_META";
+	print <<"END_META";
 url
 https://metacpan.org/release/$realname
 
@@ -98,7 +97,6 @@ source
 http://search.cpan.org/CPAN/authors/id/$cpath
 
 END_META
-	close $fh;
 
 	my $file = $cpath; $file =~ s{.*/}{};
 	system 'perl-dist' => $file;