diff options
author | Zoffix Znet <cpan@zoffix.com> | 2015-11-28 23:14:42 -0500 |
---|---|---|
committer | Zoffix Znet <cpan@zoffix.com> | 2015-11-28 23:14:42 -0500 |
commit | f4e9d98cee046fcd70bc3bcca4b2555f38254b28 (patch) | |
tree | 46d175384466d1a37e4db34d1231c23ad27b60cf /lib/IRC/Client/Plugin | |
parent | fa7bb1b7fce85b8445b7f408dc7cb2a15b9013d9 (diff) |
Inter
Diffstat (limited to 'lib/IRC/Client/Plugin')
-rw-r--r-- | lib/IRC/Client/Plugin/HNY.pm6 | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/IRC/Client/Plugin/HNY.pm6 b/lib/IRC/Client/Plugin/HNY.pm6 index 4a6b3e7..ce7154d 100644 --- a/lib/IRC/Client/Plugin/HNY.pm6 +++ b/lib/IRC/Client/Plugin/HNY.pm6 @@ -1,7 +1,13 @@ use v6; +use JSON::Tiny; use IRC::Client; use IRC::Client::Plugin; + unit class IRC::Client::Plugin::HNY:ver<1.001001> does IRC::Client::Plugin; + + +get_UTC_offsets(); + multi method interval ( ) { 6 } multi method interval (IRC::Client $irc) { $irc.privmsg( @@ -12,5 +18,9 @@ multi method interval (IRC::Client $irc) { sub get_UTC_offsets { + my $times = from-json 'tzs.json'.IO.slurp; + for $times -> $zone { + say "Offset is $zone<offset>"; + } } |