Acme::Terror::UK - Fetch the current UK terror alert level
use Acme::Terror::UK; my $t = Acme::Terror::UK->new(); # create new Acme::Terror::UK object my $level = $t->fetch; print "Current terror alert level is: $level\n";
Gets the currrent terrorist threat level in the UK.
The levels are either... CRITICAL - an attack is expected imminently SEVERE - an attack is likely SUBSTANTIAL - an attack is a strong possibility MODERATE - an attack is possible but not likely LOW - an attack is unlikely
This module aims to be compatible with the US version, Acme::Terror
use Acme::Terror::UK my $t = Acme::Terror::UK->new();
Create a new instance of the Acme:Terror::UK class.
my $threat_level_string = $t->fetch(); print $threat_level_string;
Return the current threat level as a string.
my $level = $t->level(); if ($level == Acme::Terror::UK::CRITICAL) { print "Help, we're all going to die!\n"; }
Return the level of the current terrorist threat as a comparable value.
The values to compare against are,
Acme::Terror::UK::CRITICAL Acme::Terror::UK::SEVERE Acme::Terror::UK::SUBSTANTIAL Acme::Terror::UK::MODERATE Acme::Terror::UK::LOW
If it can't retrieve the current level, it will return
Acme::Terror::UK::UNKNOWN
This module just screenscrapes the MI5 website so is vulnerable to breaking if the page design changes.
Acme::Terror http://www.mi5.gov.uk/ http://www.mi5.gov.uk/output/Page4.html http://www.intelligence.gov.uk/ http://www.homeoffice.gov.uk/security/current-threat-level/
Neil Stott for supplying a patch after MI5 site redesign B10m for supplying a patch after an MI5 site redesign
Robert Price, <rprice@cpan.org>
Copyright (C) 2006-2010 by Robert Price
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or, at your option, any later version of Perl 5 you may have available.
To install Acme::Terror::UK, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Acme::Terror::UK
CPAN shell
perl -MCPAN -e shell install Acme::Terror::UK
For more information on module installation, please visit the detailed CPAN module installation guide.