298 |
Les scripts Perl sont charg@'es et d@'echarg@'es avec la commande @command{/perl} |
Les scripts Perl sont charg@'es et d@'echarg@'es avec la commande @command{/perl} |
299 |
(tapez @kbd{/help perl} dans WeeChat pour obtenir de l'aide sur la commande).@* |
(tapez @kbd{/help perl} dans WeeChat pour obtenir de l'aide sur la commande).@* |
300 |
|
|
301 |
|
@emph{Exemples :}@* |
302 |
@itemize @bullet |
@itemize @bullet |
303 |
@item |
@item |
304 |
Exemple de chargement d'un script Perl :@* |
Charger un script Perl : @kbd{/perl load /tmp/essai.pl}@* |
305 |
@kbd{/perl load /tmp/essai.pl}@* |
@item D@'echarger tous les scripts Perl : @kbd{/perl unload}@* |
306 |
@item |
@item |
307 |
Exemple de d@'echargement d'un script Perl :@* |
Lister les scripts Perl charg@'es : @kbd{/perl}@* |
|
@kbd{/perl unload essai}@* |
|
|
A noter: le nom "essai" est le premier param@`etre de la fonction @command{IRC::register.}@* |
|
|
@item |
|
|
Liste des scripts Perl charg@'es :@* |
|
|
@kbd{/perl}@* |
|
308 |
@end itemize |
@end itemize |
309 |
|
|
310 |
@subsection Interface WeeChat / Perl |
@subsection Interface WeeChat / Perl |
329 |
@* |
@* |
330 |
@emph{Exemple :}@* |
@emph{Exemple :}@* |
331 |
@code{IRC::register ("essai", "1.0", "fin_essai", "Script d'essai !");}@* |
@code{IRC::register ("essai", "1.0", "fin_essai", "Script d'essai !");}@* |
332 |
|
@* |
333 |
|
|
334 |
@item |
@item |
335 |
@command{IRC::print ( message );}@* |
@command{IRC::print ( message );}@* |
343 |
@* |
@* |
344 |
@emph{Exemple :}@* |
@emph{Exemple :}@* |
345 |
@code{IRC::print ("message");}@* |
@code{IRC::print ("message");}@* |
346 |
|
@* |
347 |
|
|
348 |
@item |
@item |
349 |
@command{IRC::add_message_handler ( nom, fonction );}@* |
@command{IRC::add_message_handler ( nom, fonction );}@* |
369 |
@code{@ @ @ @ ($masque, $null, $canal) = split " ", $canal;}@* |
@code{@ @ @ @ ($masque, $null, $canal) = split " ", $canal;}@* |
370 |
@code{@ @ @ @ IRC::print ("masque=$masque, canal=$canal, message=$message\n");}@* |
@code{@ @ @ @ IRC::print ("masque=$masque, canal=$canal, message=$message\n");}@* |
371 |
@code{@} }@* |
@code{@} }@* |
372 |
|
@* |
373 |
|
|
374 |
@item |
@item |
375 |
@command{IRC::add_command_handler ( nom, fonction );}@* |
@command{IRC::add_command_handler ( nom, fonction );}@* |
393 |
@code{@ @ @ @ IRC::print("Param@`etres : ".@@_[0]);}@* |
@code{@ @ @ @ IRC::print("Param@`etres : ".@@_[0]);}@* |
394 |
@code{@ @ @ @ return 0;}@* |
@code{@ @ @ @ return 0;}@* |
395 |
@code{@} }@* |
@code{@} }@* |
396 |
|
@* |
397 |
|
|
398 |
@end itemize |
@end itemize |
399 |
|
|