diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-07-18 10:31:30 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-07-18 10:31:30 -0400 |
commit | 9032a2190d88ef246f46801ee735a97901aab6aa (patch) | |
tree | 48253bab805d1a882309eefe124c231bef5d50b4 /bin/template_to_spreadsheet | |
parent | 12a4bdfabf59bc6051bbd6f65772e830165eb904 (diff) | |
download | spreadsheet-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_spreadsheet | 15 |
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; |