Perl script for World cup

gistfile1.pl

#!/usr/bin/perl

use strict;
use warnings;

while (1) {
    `wget --no-proxy --quiet http://static.cricinfo.com/rss/livescores.xml -O score.txt`;
    sleep(10); # Set to seconds
    my $text = `cat score.txt`;
    $text =~ m!<title>(.*India.*)</title>!;
    my $score = $1;
    $score = '"'.$score.'"';
    `notify-send -t 500 $score`; # T the time to expire the notification. currently 500 milliseconds.
}

# The bubble stays because its a bug irrespective of the expire time flag

# sadly no overs or player info at the moment :(