1 files changed, 15 insertions, 0 deletions
diff --git a/bin/template_to_spreadsheet b/bin/template_to_spreadsheet
new file mode 100644
index 0000000..75f27ab
--- /dev/null
+++ b/bin/template_to_spreadsheet
@@ -0,0 +1,15 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+# PODNAME: template_to_spreadsheet
+# ABSTRACT: render a template into a spreadsheet
+
+use Spreadsheet::Template;
+
+my $template = Spreadsheet::Template->new;
+my $in = do { local $/; <> };
+my $out = $template->render($in);
+open my $fh, '>', 'out.xlsx';
+binmode $fh;
+$fh->print($out);
+$fh->close;