I’ve updated the Acme::Terror::UK module to version 0.02 on CPAN and added a new method called level
The new level method returns the current UK terror alert status in an easily comparible format.
my $t = Acme::Terror::UK->new();
if ($t->level() == Acme::Terror::UK::SEVERE) {
print "The current terror level is SEVEREn";
}
See the documentation with the module for more information.
On the back of this, Andy Kennedy released Acme::Terror::AU. As the Australian government refuses to release this information, his module always returns Acme::Terror::AU::UNKNOWN. π