|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrew Alakozow 2:5061/29.2 13 Nov 2003 20:50:54
To : Mikhail Polykovsky
Subject : Re[2]: Hаследование?
--------------------------------------------------------------------------------
Mikhail Polykovsky wrote to Artem Chuprina...
MP>>> sub set_err{
MP>>> my ($self, $msg, $state, $result) = @_;
MP>>> if( $self ){ (15)
MP>>> $self->{'_errstr'} = $msg;
MP> Был и такой вариант.
MP> Can't use string ("Child") as a HASH ref while "strict refs" in use at
MP> 1.pl line 15.
Если функция вызывается как метод, то первый параметр у нее определен в любом
случае: экземпляр либо имя класса. Проверку в 15 строке нужно поменять на
if( ref($self) ){
aa29.2
--- (.) ---
* Origin: Зукд ащкумук! (2:5061/29.2)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
