Acme::Terror::NL

Fetch the current NL terror alert level
Download

Acme::Terror::NL Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • M. Blom
  • Publisher web site:
  • http://search.cpan.org/~miyagawa/Text-Emoticon-Yahoo-0.02/lib/Text/Emoticon/Yahoo.pm

Acme::Terror::NL Tags


Acme::Terror::NL Description

Fetch the current NL terror alert level Acme::Terror::NL is a Perl module that can be used to fetch the current NL terror alert level.SYNOPSIS use Acme::Terror::NL; my $t = Acme::Terror::NL->new(); # create new Acme::Terror::NL object my $level = $t->fetch; print "Current terror alert level is: $level ";Gets the currrent terrorist threat level in the Netherlands.The levels are either... CRITICAL - there are strong indications that an attack will occur SUBSTANTIAL - there is a realistic possibility that an attack will occur LIMITED - it appears that attacks can be prevented. MINIMAL - it is unlikely that attacks are being planned. UNKNOWN - cannot determine threat levelThere are "only" four levels present in the Netherlands, unlike, e.g. the United Kingdom and the United States of America, where there are five. Thats what you get for being a small country.This module aims to be compatible with the US version, Acme::Terror, the UK version, Acme::Terror::UK and the AU version, Acme::Terror::AU.METHODSnew() use Acme::Terror::NL; my $t = Acme::Terror::NL->new(); Create a new instance of the Acme:Terror::NL class.fetch() my $threat_level_string = $t->fetch(); print $threat_level_string;Return the current threat level as a string.text()See fetch(), it returns the same.level() my $level = $t->level(); if ($level == Acme::Terror::NL::CRITICAL) { print "too many Ls!"; }Return the level of the current terrorist threat as a comparable value.The values to compare against are, Acme::Terror::NL::CRITICAL Acme::Terror::NL::SUBSTANTIAL Acme::Terror::NL::LIMITED Acme::Terror::NL::MINIMALIf it can't retrieve the current level, it will return Acme::Terror::NL::UNKNOWN Requirements: · Perl


Acme::Terror::NL Related Software