|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Vladimir Zhebelev 2:5020/400 24 Jun 2001 19:56:26
To : All
Subject : Re: package aliasing
--------------------------------------------------------------------------------
Hi Albert,
> я еще немного фyнкциональности емy добавил, полyчилось вpоде
> очень даже ничего 8)
>
> =======================================================================
> package namespace;
>
А чем это лучше чем "$main::{'File::'} = *IO::File::;"?
Кроме того, как оно будет работать в случае нескольких 'use namespace'?
Плюс куча ситуаций, где оно не будет работать или будет работать криво,
например:
---------------------
use namespace Pack => Bar::Foo;
$foo = new Pack;
$bar = new Bar::Foo;
package Bar::Foo;
sub new {
my ( $class) = @_;
print "blessing into $class\n";
bless {}, $class;
}
------------------------
Can't locate object method "new" via package "Pack" (perhaps you forgot to
load "Pack"?) at 3.pl line 3.
тогда как:
-------------------------
$main::{'Pack::'} = *Bar::Foo::;
$foo = new Pack;
$bar = new Bar::Foo;
package Bar::Foo;
sub new {
my ( $class) = @_;
print "blessing into $class\n";
bless {}, $class;
}
---------------------------
blessing into Pack
blessing into Bar::Foo
Плюс отсутствие 'sub unimport' и присутствие 'eval sprintf'...
vz
--- ifmail v.2.15dev5
* Origin: Excite@Home - The Leader in Broadband http://home.com/f (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
