Xchat::hook_command('j', sub {
    my @channels = split(/,/, $_[1][1]);
    foreach $channel(@channels) {
        $channel = '#'.$channel unless ($channel =~ m/^#/);
        Xchat::command("join $channel");
    }
    return Xchat::EAT_ALL;
});