changeset 5:e762bb571a45

gather file and direcotory method
author Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Wed, 24 Jan 2018 23:32:25 +0900
parents 03ab44e80533
children e35e9779078a
files lib/Slideshow/Util.pm
diffstat 1 files changed, 2 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lib/Slideshow/Util.pm	Wed Jan 24 23:23:12 2018 +0900
+++ b/lib/Slideshow/Util.pm	Wed Jan 24 23:32:25 2018 +0900
@@ -29,12 +29,8 @@
     my $root_dir = path($root_directory_name);
     my $t = localtime;
 
-    my $day_dir = $root_dir->child($t->strftime('%Y%m%d'));
-    $day_dir->mkpath;
-
-    my $slide = $day_dir->child('slide.md');
-    $slide->touch;
-    #    $slide->copy($template);
+    # ex... 2018/02/14
+    my $slide = $root_dir->child($t->strftime('%Y%m%d'). '/'.'slide.md')->touchpath;
     $template->copy($slide);
 }