これじゃだめか？
<?php
echo hoge();

function hoge()
{
　　return __FUNCTION__;
}
?>
perlは知らないが