RE: html::table module
Dhivya Arasappan/O/VCU wrote: : But the HTML code does not have these tags. Is there any : way I can add it in, while still using this module to : create the table? It looks like you would have to rewrite the getTable() method. html::table tests for the header inside the row loop. You would need to check for a header row outside the column loop and add thead and tbody tags. It might be easier to change the javascript code, but if you do customize the module send a patch to the author. HTH, Charles K. Clarkson -- Mobile Homes Specialist Free Market Advocate Web Programmer 254 968-8328 Don't tread on my bandwidth. Trim your posts. ___ Perl-Win32-Web mailing list Perl-Win32-Web@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: CGI header problem in 5.8
dorian wrote: : Any help on this would be most appreciated. I am hesitant to upgrade : my production server to 5.8 and now the scripts on my development and : production servers are out of sync. Try using the CGI.pm version from your production server instead of the version which came with Perl 5.8. HTH, Charles K. Clarkson -- Mobile Homes Specialist 254 968-8328 ___ Perl-Win32-Web mailing list Perl-Win32-Web@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Problem using Http::Request::Form
varun bhardwaj <> wrote: : Hi Everyone : : I am using the perl script in php but at the time of : calling of this script it gives error at : http::request::form. What is the error? HTH, Charles K. Clarkson -- Mobile Homes Specialist 254 968-8328 . . . And Liberty and Justice for all (heterosexuals). ___ Perl-Win32-Web mailing list Perl-Win32-Web@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: How can I turn OFF optional directive ???
Eric Amick <[EMAIL PROTECTED]> wrote: : Maybe I've completely missed what you're after, but : won't this do what you want? : : use CGI qw/-no_xhtml/; # or -noxhtml : : See the PRAGMAS section of the CGI module docs. That changes the DOCTYPE to HTML 4.01 Transitional. It outputs HTML, not xhtml. http://www.w3.org/TR/html4/loose.dtd";> Michael indicated he wanted to use xhtml and CSS2. The default (not using -noxhtml) produces xhtml Basic 1.0 compliant markup. http://www.w3.org/TR/xhtml-basic/xhtml-basic10.dtd";> Many web site designers push xhtml and CSS design over the more common HTML and table-based design. Seeking to illustrate a clean separation of design from content, CSSZenGarden.com presents many designs which use an identical xhtml file with custom graphics and CSS. http://www.csszengarden.com/ Take a look at this site (and its many designs) in Mozilla browser as well as IE and note the difference. HTH, Charles K. Clarkson -- Mobile Homes Specialist 254 968-8328 ___ Perl-Win32-Web mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: How can I turn OFF optional directive ???
Michael D Schleif <[EMAIL PROTECTED]> wrote:
: "Charles K. Clarkson" <[EMAIL PROTECTED]>
: [2004:08:12:11:01:29-0500] scribed:
: : Michael D Schleif <[EMAIL PROTECTED]> wrote:
: :
: : : As near as I can tell, the directive is *optional*,
: : : according to the XML standards. However, it appears to be
: : : mandatory in my version of CGI.pm.
: :
: : It is mandatory in my version also. Here is a snippet
: : from start_html().
: :
[snipped code]
: :
: : Commenting line 1324 stops the "
:
: Yes, I had already seen that. Written as it is, there is no
: way to `formally' turn it OFF, without resorting to editing the
: module source.
: And, as you point out, that is quite distasteful ;<
:
: I may have found a better way:
:
: #! /usr/bin/perl -T
: use diagnostics;
: use strict;
: use warnings;
: use CGI;
: my $q = new CGI;
: my $start_html = $q->start_html ("simple.plx");
: print $q->header,
: mod_start_html ($start_html),
: $q->end_html;
: exit 0;
: sub mod_start_html {
: $_[0] =~ s!<\?xml[^>]+>!!;
: return $_[0];
: }
:
: This appears to work, even when adding several attributes to
: $q->start_html().
Or (Just thought of this.):
my $q = new CGI;
print
$q->header(),
$q->no_xml_start_html( 'simple.plx' ),
$q->end_html();
sub CGI::no_xml_start_html {
my $self = shift;
my $start_html = $self->start_html( @_ );
$start_html =~ s!<\?xml[^>]+>!!;
return $start_html;
}
__END__
: O, and this *DOES* validate here:
:
: <http://validator.w3.org/>
:
: What do you think?
If the xml doctype is supposed to be optional (I
didn't verify this), it should validate when missing.
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328
___
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: How can I turn OFF optional directive ???
Michael D Schleif <[EMAIL PROTECTED]> wrote:
: Recently, I have encountered some browser inconsistencies
: while moving on to CSS2 based web sites. Several kind
: souls have suggested removing the following line from my
: resulting web pages:
:
:
:
: In fact, when I edit a copy of my CGI generated web pages,
: the resulting page renders as expected, especially on IE6.
Yes. IE6 will go into Quirks if the XML declaration is
present. This url has more details.
http://www.hut.fi/u/hsivonen/doctype.html
: As near as I can tell, the directive is *optional*,
: according to the XML standards. However, it appears to be
: mandatory in my version of CGI.pm.
It is mandatory in my version also. Here is a snippet
from start_html().
1311my(@result,$xml_dtd);
1312if ($dtd) {
1313if (defined(ref($dtd)) and (ref($dtd) eq 'ARRAY')) {
1314$dtd = $DEFAULT_DTD unless $dtd->[0] =~ m|^-//|;
1315} else {
1316$dtd = $DEFAULT_DTD unless $dtd =~ m|^-//|;
1317}
1318} else {
1319$dtd = $XHTML ? XHTML_DTD : $DEFAULT_DTD;
1320}
1321
1322$xml_dtd++ if ref($dtd) eq 'ARRAY' && $dtd->[0] =~ /\bXHTML\b/i;
1323$xml_dtd++ if ref($dtd) eq '' && $dtd =~ /\bXHTML\b/i;
1324push @result,q() if $xml_dtd;
1325
1326if (ref($dtd) && ref($dtd) eq 'ARRAY') {
Commenting line 1324 stops the "[0] =~ /\bXHTML\b/i;
1323$xml_dtd++ if ref($dtd) eq '' && $dtd =~ /\bXHTML\b/i;
1324# push @result,q() if
$xml_dtd;
1325
1326if (ref($dtd) && ref($dtd) eq 'ARRAY') {
You'll need to edit again if the admin upgrades or
re-installs CGI.pm. If you can't get to the CGI.pm source
you could copy it locally and "use lib" to use CGI.pm.
I imagine you could also write a module that subclasses
CGI.pm or wraps it to remove the "http://listserv.ActiveState.com/mailman/mysubs
