|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexey Bavykin 2:5020/400 17 Nov 2005 14:30:11
To : Andrey Chernomyrdin
Subject : Re: вопрос про STDOUT
--------------------------------------------------------------------------------
Andrey Chernomyrdin @ Thu 17/11/05 12:04 +0300 :
AC> День добрый,
AC> Вот хотелось-бы узнать такую вещь:
AC> В подпрограмму (foo) передают некий скаляр, если это reference - то
AC> считаем что это некий объект который поддерживает метод print и с
AC> помощью этого метода выводим информацию, если это не reference - то
AC> считаем что это имя файла который нужно открыть и выводить в него
AC> информацию.
AC> Теперь если я хочу вывести информацию на STDOUT я передаю foo(
AC> *STDOUT ), но *STDOUT - это не reference 8-/ и у него нет метода
AC> print.
AC> $ perl -e '$o = *STDOUT; print STDOUT ( "ref: <", ref( $o ), ">\n")'
AC> ref: <>
AC> $ perl -e '$o = *STDOUT; $o->print( "ref: <", ref( $o ), ">\n")'
AC> Can't locate object method "print" via package "IO::Handle" at -e line 1.
AC> Или я где-то в трех соснах заблудился, либо...
use UNIVERSAL qw/can/;
--
Alexey
--- ifmail v.2.15dev5.3
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: вопрос про STDOUT 