[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl-win32-web
Subject:    RE: CGI.pm tab property
From:       "Troy Sniff" <tsniff () wolfcountry ! com>
Date:       2001-05-31 5:31:48
[Download RAW message or body]

I ran this and it works fine:

#!/usr/local/bin/perl
use CGI qw(:all *table);
my $q = new CGI;
print $q->header;
print $q->start_table({-border => 0, bgcolor=>'lightgrey'});
print $q->Tr(td({-colspan => '99'}, 'Select one'));
print $q->end_table();

Is that what you were going for?

Did you make sure you added *table to the use CGI?

Troy


-----Original Message-----
From: perl-win32-web-admin@listserv.ActiveState.com
[mailto:perl-win32-web-admin@listserv.ActiveState.com] On Behalf Of Mark
Zvolanek
Sent: Wednesday, May 30, 2001 10:39 PM
To: 'perl-win32-web@listserv.ActiveState.com'
Subject: CGI.pm tab property


Hi perl-win32-websters,
When using cgi.pm the following line of code 
	print Tr(td({-COLSPAN => '99'}, 'Select one'));
should produce the same output as the non cgi.pm line below.
	print '<TR><TD COLSPAN=99>Select one</TD></TR>';
For a reason unknown to me,  the TD tag property COLSPAN=99 is somehow
lost when using the cgi.pm style code. Output is only '<TR><TD>Select
one</TD></TR>'. Would someone know what possible reasons could cause
this? I also have the same problem with 
	print a({-HREF=>'....'},'label');
What am I doing wrong?
Lines like 
print $q -> start_table({-border => 0, bgcolor=>'lightgrey'}); work OK.

Regards
Mark 
_______________________________________________
Perl-Win32-Web mailing list Perl-Win32-Web@listserv.ActiveState.com
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web

_______________________________________________
Perl-Win32-Web mailing list
Perl-Win32-Web@listserv.ActiveState.com
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web

[prev in list] [next in list] [prev in thread] [next in thread]