gistfile1.txt

# put this in ~/.irssi/scripts/autorun/connect.pl

use strict;
use vars qw($VERSION %IRSSI);

$VERSION = '0.01';
%IRSSI = (
    authors     => 'fapestniegd',
    contact     => '###########@gmail.com',
    name        => 'autoconnectssl',
    description => 'automatically connect to SSL servers on startup',
    license     => 'Public Domain||GPLv2 or greater',
    url         => 'http://',
    changed     => '2010-12-18'
);

use Irssi qw(command_bind servers channels windows command);

command "/connect -SSL $ENV{'IRC_SERVER'} 8080 $ENV{'IRC_USER'}:$ENV{'IRC_PASSWORD'}"