No, but 'perldoc perlsyn' shows a numbers of ways to do it, not including the great fun of a dispatch table -- a Hash of Subs.

After Compline,
Zaxo