|
Тема |
Помощ и от мен / въпрос на Перл |
|
Автор | Пeшo (Нерегистриран) | |
Публикувано | 09.01.06 16:56 |
|
|
Може ли да ми кажете как е възможно това? Имаме 2 функции set_table и get_table (в голям CGI уебсайт):
sub set_table
{
my ($self, $table) = @_;
if (defined ($table))
{
$self->{_table} = $table;
}
}
sub get_table
{
my $self = shift;
return $self->{_table};
}
Съвсем нормални ми се струват. И ги извиквам така:
$self->set_table("clicks");
my $x = $self->get_table();
die "$x";
И чудо на чудесата: $x не е clicks, a друго име на таблица (което така и не знам къде го задават, ама явно някъде). А ако в set_table сложа die statement така:
$self->{_table} = $table;
my $x = $self->{_table};
die "$x";
$x си е clicks, както може да се очаква. Как може такова чудо да стане? Перл ми е страшна мъгла - ще ме уволнят. Помагайте сега.
|
| |
|
|
|