Opera Software ASA

really?!?! awesome!

============
It would be nice if the Australian alert were added.
NZ does not need any kind of alert, it is just that kind of nation.

Max Power, CEO
Power Broadcasting
HireMe.geek.nz
============

NAME
Acme::Terror::AU - Fetch the current AU terror alert level

http://www.cpan.org/modules/by-module/LWP/ADAMK/Acme-Terror-AU-0.01.readme

SYNOPSIS
use Acme::Terror::AU;
my = Acme::Terror::AU->new(); # create new Acme::Terror::AU object

my = ->fetch;
print "Current terror alert level is:
";

DESCRIPTION
Gets the currrent terrorist threat level in Australia.

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
UNKNOWN - cannot determine threat level

HOWEVER, as the government has repeatedly stated that they think
triggering various security events off a single level system would be
damage flexibiliy by oversimplifying the situation, and in any case, why
on earth should they let the terrorists see what their alert status is.

And so this module never returns any of the above status, and instead
always returns UNKNOWN.

This module aims to be compatible with the US version Acme::Terror and
the UK version Acme::Terror::UK.

METHODS
new()
use Acme::Terror::AU
my = Acme::Terror::AU->new();

Create a new instance of the Acme::Terror::AU class.

fetch()
my = ->fetch();
print ;

Return the current threat level as a string.

level()
my = ->level();
if ( == Acme::Terror::AU::CRITICAL) {
print "Help, we're all going to die!
";
}

Return the level of the current terrorist threat as a comparable value.

The values to compare against are,

Acme::Terror::AU::CRITICAL
Acme::Terror::AU::SEVERE
Acme::Terror::AU::SUBSTANTIAL
Acme::Terror::AU::MODERATE
Acme::Terror::AU::LOW

If it can't retrieve the current level, it will return

Acme::Terror::AU::UNKNOWN

BUGS
This module may become buggy if Australia develops a simple public and
level-based terror alert system, like the ones the US and UK have.

SEE ALSO
Acme::Terror, Acme::Terror::UK

AUTHOR
Adam Kennedy <adamk.org>

COPYRIGHT AND LICENSE
Copyright (C) 2006 Adam Kennedy.

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.

it would be funnier if we could use this:
http://www.geekandproud.net/terror/
as the images for the "terror" alerts.

i hope people understand that these "terror alert" and "threat advisory" systems are wholly inaccurate and not grounded in reality, they in-fact, are forms of psychological terrorism themselves. they do a whole lot more harm than good, if they do any good at all that is.

I like this widget.

Is there any chance of including Australia's threat level on this widget as well? Australia's threat level can be found at http://www.nationalsecurity.gov.au/

totally useless widget...
in fact, it may be the most useless widget so far

i'm pefectly safe, hasn't been a terrorist attack here since 1066 when william the conquerer landed here...

Don't be so scary to run this widget all the time.
Some goverments want mo make us feel scary!