Discussion :

[Fanch.g]

Salut,

Je cherche de la doc sur comment implementer des Pointeur sur fonction en Perl.


Un peu commme dans :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
$parser->setHandlers(	Start => \&_start_handler,
				End => \&_end_handler,
				Char => \&_char_handler,
				CdataStart => \&_cdatastart_handler,	
				CdataEnd => \&_cdataend_handler,
				Default => \&_default_handler);

[2Eurocents]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
sub mafonction {
  my $p1 = shift;
  print "$p1 : dans mafonction\n";
}
 
my $fn = \&mafonction;
 
&$fn ("Où suis-je") ;
$fn-> ("Où vais-je") ;

etc.

\ est l'opérateur pour prendre une référence
et & indique que la variable référence une fonction, et pas un scalaire ou une liste ...

[Fanch.g]

Merci