On Monday, July 22, 2002, at 04:36 , chris wrote:
Here is what I am doing
use A;
my $this = {};
bless $this;
my $result = $this-A::sub1 (my $args);
why pass in an uninitialized value??? that is
scoped to pass out of existence
also this blessed object gambit should
be in the package
On Tuesday, July 23, 2002, at 09:45 , chris wrote:
You are correct.
perchance, but I will accept that as
oh, well that's worth ripping off and reusing
as being more accurate...
I will follow your advice.
may I recommend that you limit following my
advice to only the 'useful
Here is what I am doing
use A;
my $this = {};
bless $this;
my $result = $this-A::sub1 (my $args);
Package A;
sub1 {
my $this = shift
my ($data) = @_;
my $result = $this-sub2($data); $this-sub2($data) does not load
return $result;
}
sub2 {
...
}
I think I can understand why sub2 cannot