Параметр функция???

[C++]

Привет!
Может кто-нибудь знает как в перле передать функцию в качестве параметра другой функции, и как его использовать в этой функции?
Спасибо.

[GotZfild]

Код: [Выделить]


$func = \\&some;
&another($func);
sub some {
      print $_[0];
}
sub another {
      $_[0]->("SOME");
}