aboyle

#!/usr/bin/perl

use strict;
use Irssi;

sub getSite {
  my @file = ();
  open(INF, "wget -qO- http://www.civstats.com/viewgame.php?gameid=2153 |");
  while(my $line = <INF>) {
    chomp($line);