On 15 Apr 2002, simran wrote:

> Hi Phil,
>
> You have:
>
> >     bless {
> >         _data_table         => $data,
> >         _html_template        => HTML::Template->new(filename =>
> > $html_template),
> >         _template_params    => $self->_init
> >     }, $self;
>
> Seems pretty unusual (my perl knowledge says that that is not valid -
> although i'm not definitive source!).

I thought so at first too, but look how $self is initialized:

  sub new {
    my $self = shift;

That means that $self initially contains the package name -
"UICMS::HTMLFile" - so that the call to _init is the same as:

  UICMS::HTMLFile->_init()

Which works.  It's not what I'd call good style but it's not the problem
here.

-sam





---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to