sub connected {
    my @channels = ('#nechku');

    #if debug, enable debug mode
    if ($global->{ 'debug_mode' }) {
        push(@channels, '#nechkudebug');
    } else {
        push(@channels, $global->{ 'channel' });
    }

    #Join channels
    foreach my $channels (@channels) {
        $irc->yield(join => $channels);
        print "Joining " . $channels . "\n";
    }
}