comparison slideshow.pl @ 4:03ab44e80533

add make script
author Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Wed, 24 Jan 2018 23:23:12 +0900
parents
children e35e9779078a
comparison
equal deleted inserted replaced
3:9175e77652b3 4:03ab44e80533
1 #!/usr/bin/env perl
2 use strict;
3 use warnings;
4 use utf8;
5
6
7 use lib 'lib';
8 use Slideshow::Util;
9 use Getopt::Long;
10
11 my $new_flag;
12
13 GetOptions("new" => \$new_flag) or die("Error at new flags");
14
15 if ($new_flag){
16 new(set_template('lib/template.md'),"slides");
17 }