#!/usr/bin/perl -w
use v5.14;

use Gruntmaster::Data qw/SUBSCRIBE WAIT_FOR_MESSAGES/;
use Gruntmaster::Page;

SUBSCRIBE 'genpage', \&Gruntmaster::Page::generate;
WAIT_FOR_MESSAGES 86400 while 1;

1;
__END__