summaryrefslogtreecommitdiff
path: root/utils
diff options
context:
space:
mode:
Diffstat (limited to 'utils')
-rwxr-xr-xutils/rhrd-schedules11
1 files changed, 8 insertions, 3 deletions
diff --git a/utils/rhrd-schedules b/utils/rhrd-schedules
index 76d4946..b82bbee 100755
--- a/utils/rhrd-schedules
+++ b/utils/rhrd-schedules
@@ -23,14 +23,13 @@
use strict;
# TODO: remove me!!!
-use Data::Dumper::Simple;
use lib "../lib/";
-
use RHRD::rddb;
use RHRD::utils;
use String::MkPasswd qw(mkpasswd);
+binmode(STDOUT, ":utf8");
sub print_usage
{
@@ -47,7 +46,13 @@ sub generate
return 1;
}
- print Dumper($data);
+ for my $entry (@{$data}) {
+ my $start = ${$entry}{'start'};
+ my $title = ${$entry}{'title'};
+ my $showid = ${$entry}{'id'};
+
+ print "$start: ($showid) $title\n";
+ }
return 0;
}