2013/12/27 Анатолий Гришаев <[email protected]>:
> Возможно ли создать функцию с прототипом как у print?

http://www.perlmonks.org/?node_id=905550

> print_utf FILE_UTF $foo;
> print_cp1251 FILE_UTF $foo;

Чего вы добиваетесь этим?

> В догонку: а можно ли узнать как тебя вызвали как метод или как программу?

Методу первым аргументом передается объект или класс, на котором его вызвали:
http://perldoc.perl.org/perlobj.html#Method-Invocation

Также: https://metacpan.org/pod/Devel::Caller, called_as_method()
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить