#!/usr/bin/env perl
use strict;
use warnings;
use utf8;


use lib 'lib';
use Slideshow::Util;
use Getopt::Long;

my $new_flag;

GetOptions("new" => \$new_flag) or die("Error at new flags");

if ($new_flag){
    new(set_template('lib/template.md'),"slides");
}