Enhance friday.txt file parser, add some quotes to friday.txt

data/friday.txt

@@ -11,6 +11,47 @@ user, ты пиво купил? || 5
 В пятницу совесть доживает только до обеда… || 5
 Сколько работнику не плати, всё равно пятницы ждёт || 1234
 Робинзооон!!! || 5
+В пятницу чаще всего хочется выпить. В понедельник чаще всего хочется пятницу. || 15
+Здравствуй Пятница, здравствуй, любимая, наконец-то ты пришла! || 5
+Зарплата в пятницу — удар по печени. || 5
+Вот и пятница пришла, счастье, радость принесла! || 5
+Все мы — пятницофилы и понедельникофобы. || 15
+Люблю понедельник — всего три дня до пятницы. || 1
+Ну здравствуй, пятница. Я дополз к тебе. || 5
+Пятница. Улыбните Улыбальник. || 5
+Чувствуете? Выходными пахнет! || 5
+До пятницы осталось…. пережить четверг! || 4
+Если пятый день подряд опаздываешь на работу, значит сегодня пятница. || 5
+От понедельника до пятницы очень далеко, а от пятницы до понедельника рукой подать. || 123467
+Жизнь начинается в пятницу вечером… В остальное время — выживание. || 5
+Пятница… белочки следят за тобой. || 5
+Примета: Если утром жена с вами не разговаривает, значит, вчера была пятница. || 6
+Чем ближе пятница, тем добрее утро! || 1234
+Пятница — лучший день недели, особенно её вечер, так как выходные еще не начались, а работа уже закончилась. || 5
+Отличной была пятница! Особенно запомнились русские народные катания на полицейских бобиках! || 1
+Четверг это маленькая пятница, а пятницу можно считать выходным. || 4
+Пятница традиционно начиналась легким ужином в четверг и заканчивалась плотным завтраком в понедельник. || 4
+Уже с пятницы начинаешь бояться, что скоро понедельник! || 67
+Каждую пятницу жизнь начинается сначала. || 5
+С пятницами надо быть осторожней. Они обещают слишком уж многое. Они словно рецензия на кинофильм: лишь в редких случаях предсказанное ими сбывается. || 5
+Русские в понедельник не работают — у них тяжелый день. || 1
+Все мы просто дети, изображающие на работе профессионалов, а на самом деле ждущие пятницы, чтобы быть сами собой! || 5
+Почему-то в пятницу хочется ничего не делать. Хотя в другие дни тоже хочется, но в пятницу ничего не делать хочется особенно сильно. || 5
+Хочешь жить завтрашним днем — устрой себе семь пятниц на неделе. || 5
+Что мне снег, что мне зной, что мне вермут разливной, когда мои друзья со мной! || 5
+Каждую пятницу количество довольных жизнью людей увеличивается на пару миллиардов. Этот эффект длится вплоть до понедельника. || 123467
+Так, Понедельник, Вторник, Среда, Четверг, проходим, проходим, не задерживаем Пятницу! || 1234
+Четверг. Смотрю на часы — 16.00. Еле сдерживаюсь, чтобы не закричать — Ура! Во Владивостоке Пятница! || 4
+Пятница — друг человека! || 5
+В пятницу вечером понимаешь, что в принципе — жить можно. || 5
+Ничто так не портит пятницу, как новость о том, что сегодня четверг. || 4
+Жить нужно так, как будто каждый день пятница. || 123467
+Только настроился на работу ― и вдруг снова пятница, снова отдых… Вот так всегда! || 5
+Хорошо, что пятница! Плохо, что еще только утро… || 5
+Уходя вечером с работы, он был рад, что сегодня пятница и можно спрятаться в уикенде. Он накроется субботой и воскресеньем как двумя толстыми одеялами. Ему ничего не хотелось делать; у него даже не хватало мужества читать. || 5
+Понедельник ― отходим от выходных, вторник ― готовимся к работе, среда ― работаем, четверг ― отдыхаем от работы, пятница ― готовимся к выходным. Вывод: может, хватит уже работать по средам! || 3
+Неделя тянется со скоростью улитки. Но в пятницу вечером улитка превращается в Феррари. || 5
+Прогноз погоды на пятницу: облачно, вечером осадки в виде алкоголя, возможен секс. || 5
 А пятница всё ближе. Печень в ужасе, попа в предвкушении! || 5
 Люди, с кем я вчера пила? Объясните, откуда у меня кот и почему люди в магазине мне хлопают… Кстати… никому кот не нужен? || 6
 ПЯТНИЦА — это старинный народный праздник, который начинают праздновать в ПЯТНИЦУ, а заканчивают — в ПОНЕДЕЛЬНИК || 567
@@ -62,4 +103,4 @@ user, ты пиво купил? || 5
 Предлагаю переименовать четверг в "завтра пятница"! || 4
 Говорят, при Сталине все субботы были рабочие, должно быть он и вправду был садист и тиран! || 6
 Остановись, воскресенье! Ты прекрасно!!! || 7
-Воскресенье — день трагичный. Суббота маячит далеко позади, а до понедельника уже рукой подать || 7
+Воскресенье — день трагичный. Суббота маячит далеко позади, а до понедельника уже рукой подать || 7

lib/friday.pm

@@ -51,8 +51,9 @@ sub seed () {
 		my @daylist = split(//, $days);
 
 		foreach my $day (@daylist) {
+			next unless (defined $day);
 			next unless ($day =~ /^\d$/);
-			push @{$friday->[$day - 1]}, $phrase;
+			push @{$friday->[$day - 1]}, $phrase if (defined $phrase && ($phrase ne '') && ($phrase !~ m/^\s+$/xmsg));
 		}
 	}