C'est tout bête, mais bien pratique parfois... qui me dit ce que fait ce petit bout de perl en forme d'alias pour irssi? :)
/alias chutchut /script exec use Irssi; $_->command("window close") for \
( grep { $_->{active}->{type} eq 'QUERY' } Irssi::windows() );Perl caibon mangezan.
Sans avoir lu la doc du module, je dirais que euh, ça ferme toutes les fenêtres de messages privés ? Malotru vas, tu te fais tant spammer que ça ? :)
Sans prétendre avoir bon (ni un perleux, ni même un connaisseur de l'API IRSSI), ça ressemble à un alias fermant toutes les query d'un irssi. J'ai bon ? J'ai gagné un café ? :)
Eh. Comme quoi Perl c'est super lisible. Merci à mes cobayes. ^^