summaryrefslogtreecommitdiffstats
path: root/bin/template_to_spreadsheet
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2013-07-18 10:31:30 -0400
committerJesse Luehrs <doy@tozt.net>2013-07-18 10:31:30 -0400
commit9032a2190d88ef246f46801ee735a97901aab6aa (patch)
tree48253bab805d1a882309eefe124c231bef5d50b4 /bin/template_to_spreadsheet
parent12a4bdfabf59bc6051bbd6f65772e830165eb904 (diff)
downloadspreadsheet-template-9032a2190d88ef246f46801ee735a97901aab6aa.tar.gz
spreadsheet-template-9032a2190d88ef246f46801ee735a97901aab6aa.zip
rename these scripts, and add abstracts
Diffstat (limited to 'bin/template_to_spreadsheet')
-rw-r--r--bin/template_to_spreadsheet15
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;