This seems like a flame, but I will try and answer your question. The
reason why we are doing the HTML subroutines and so many others with
key at the start (e.g. JSCript, DB, make, get). is mostly to support
long term maintenance and parse out pieces of the code for a very large
project (divide and conquer). The modules libraries are maintained in a
consistent manner. The variables $new_page and $from_page also are
significant in this large code. It just helps the many people that have
to touch this code have an easier path getting though any maintenance.
The main program is nothing more than large set subroutine calls broken
down in sections. The subroutine calls are shared by many modules of
the large project.
Also, I really appreciate "[EMAIL PROTECTED]" response as it did
clarify the issue and was very helpful.
Jeremiah Foster wrote:
On Sep 27, 2007, at 6:41 PM, Michael Barto wrote:
Perl snippet question:
---------------------------------------------
#!/usr/bin/perl -w
use strict;
use CGI;
use CGI::Carp 'fatalsToBrowser';
my $new_page = new CGI("");
sub HTMLendFORM ($) {
my $new_page = $_[0];
print $new_page->end_form;
}
HTMLendFORM ($new_page);
print "\n\n";
---------------------------------------------
This above code produces "<div></div></form>". This
ti me is odd, since i only really want </form>. Does anyone have
an explanation or another way to use the CGI.pm library and produce
only </form>. Yes I could just use a print statement. But I am
kind of curious to why?
Why are you doing it this way? You do not need a sub and it is best to
use $q (or the functional interface) since if anyone has to read your
code they will recognize $q immediately but wonder what $new_page is
for. And why are you printing two new lines? New lines do not show up
in HTML.
Try this:
print $q->end_form();
That usually produces </form>
--
|
Michael Barto
Software Architect
|
|
LogiQwest
Inc.
16458 Bolsa Chica Street, # 15
Huntington Beach, CA 92649
http://www.logiqwest.com/
|
|
[EMAIL PROTECTED]
Tel: 714 377 3705
Fax: 714 840 3937
Cell: 714 883 1949
|
'tis a gift to be
simple
|
| This e-mail may contain
LogiQwest
proprietary information and should be treated as confidential. |
|
