Select Code to Download

#!/usr/bin/perl -w
use strict;
...

$irc->start;
save;

$myself     = 'Octopus';
$version    = '0.5';
...
    $output_file    = "charts/chan.$1.net.png";
    $output_url     = "http://my.web.site/octopus/chan.$1.net.png";
}