The UK stuff is commented out because the server seems to be down. Probably because of the recent unfortunate events in that area. Either way, I hope someone finds this cool and useful. I certainly dig it!#!/usr/bin/perl use strict; #use Acme::Terror::UK; use Acme::Terror; use DCOP; my $t = Acme::Terror->new(); #my $s = Acme::Terror::UK->new(); my $dcop = DCOP->new(); #my $uLevel = $s->fetch(); my $level = $t->fetch(); my $current_song = $dcop->run( 'amarok player nowPlaying' ); if ($dcop->run('amarok player status') == 1) { $current_song = "$current_song [paused]"; } if ($current_song) { print "I am currently listening to: $current_song\n"; } print "Stay informed! The current terrorist threat level in the US is +: $level\n"; #print "Also: The current terrorist threat level in the UK is: $uLevel +\n";
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Dynamic GAIM Info
by Tanktalus (Canon) on Aug 12, 2006 at 14:04 UTC | |
by frew (Acolyte) on Aug 13, 2006 at 20:42 UTC | |
|
Re: Dynamic GAIM Info
by f00li5h (Chaplain) on Aug 12, 2006 at 05:34 UTC |