On Fri, 14 Nov 2003 07:47:36 +1100, Colin Johnstone wrote:
> my $formName = 'form'.$self->?
my $formName = 'form' . $self->{'FRM_CNT'};
> my ($proto, $sysData) = @_;
> my $class = ref($proto) || $proto;
No need for all this. Just write:
my $class = shift;
my $sysData = shift;
-
On Nov 14, Colin Johnstone said:
>I have to keep track of the number of forms on my page so I can create
>unique names for them, to do that I have initiated a variable FRM_CNT.
>
>The modification I have to make is to add a sub that produces the HTML for
>a drop down box, one of the first tasks of
Gidday All,
Im modifying this package. What it does is produce the html for our
presentation templates of our content management system.
I have to keep track of the number of forms on my page so I can create
unique names for them, to do that I have initiated a variable FRM_CNT.
One of my more