summaryrefslogtreecommitdiff
path: root/rhautoimport-ra
diff options
context:
space:
mode:
authorChristian Pointner <equinox@helsinki.at>2021-01-27 15:16:32 (GMT)
committerChristian Pointner <equinox@helsinki.at>2021-01-27 15:16:32 (GMT)
commit7702f414652a2ef64fdb0a261e3c256261b26f88 (patch)
tree558a1bdacfe8f77e2a1fd2cf6c6d07081e052aea /rhautoimport-ra
parentcce527d6744c2f30db21242bbc2820c2b9918bf8 (diff)
print todays date on ra importer
Diffstat (limited to 'rhautoimport-ra')
-rwxr-xr-xrhautoimport-ra2
1 files changed, 2 insertions, 0 deletions
diff --git a/rhautoimport-ra b/rhautoimport-ra
index 46980e5..2bfe744 100755
--- a/rhautoimport-ra
+++ b/rhautoimport-ra
@@ -74,6 +74,8 @@ $tmp[2] = 1;
my @broadcast_date = Date::Calc::Business_to_Standard(@tmp);
$tmp[2] = 6;
my @import_date = Date::Calc::Business_to_Standard(@tmp);
+
+print "today: " . Date::Calc::Date_to_Text(@today) . "\n";
print "day of original broadcast: " . Date::Calc::Date_to_Text(@broadcast_date) . "\n";
print "day of Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@import_date) . "\n";