From 0e19450136960c52cb5cd64708a9ed1b4cbeb174 Mon Sep 17 00:00:00 2001
From: Gabor Szabo <gabor@szabgab.com>
Date: Fri, 29 Nov 2013 12:56:46 +0200
Subject: [PATCH] use older perl

---
 bin/generate.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/bin/generate.pl b/bin/generate.pl
index 9dcb0c0..ac41209 100644
--- a/bin/generate.pl
+++ b/bin/generate.pl
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
-use 5.012;
-use autodie;
+#use 5.012;
+#use autodie;
 
 use Template;
 use DateTime;
@@ -21,7 +21,7 @@
 
 
 foreach my $p (@pages) {
-	open my $fh, '<', "pages/$p";
+	open my $fh, '<', "pages/$p" or die $!;
 	my %params = ( content => '' );
 	while (my $row = <$fh>) {
 		#chomp $row;