my startup script has the line
use Html::App;
my main script calls this
use strict;
use Html::App;
use DBI;
my ($cnt,$stts)=();
$main::html=();
$main::html=Html::App->new;
Html::App contains
package Html::App;
sub new {
my $class = shift;
my $self = {};
print STDERR "$class, $self\n";
bless($self, $class);
return $self;
}
In the error log I get a print of the class and hash id
The problem is that the hash id is the same after continuous runs. Therefore
repeat refreshes results in unusual behaviour. I think there must be some
closure some where but can't spot it.
Does any one out there know the reason??
Thanks in advance
John
********************************************************************
This e-mail is intended only for the addressee named above.
As this e-mail may contain confidential or privileged information,
if you are not the named addressee, you are not authorised to
retain, read, copy or disseminate this message or any part of it.
********************************************************************
