Select Code to Download

sub start_it
{
...

    $irc->start() || die("Impossible to start.");
}

sub on_connect
{
...
    $conn->join($conn->{channel});
    $conn->{connected} = 1;
}

sub on_disconnect
{
...
    do_runlog(4,""); # Logs that it lost the connection
    start_it(); # Start over
}