http://www.perlmonks.org?node_id=951397


in reply to Dynamic Validation messages in PERL Script

Welcome to perlmonks. Since you don't really give us a lot to go on regarding your actual Perl problem all I can offer is some generic advice. Please read and understand:

Update: s/not/note/

  • Comment on Re: Dynamic Validation messages in PERL Script

Replies are listed 'Best First'.
Re^2: Dynamic Validation messages in PERL Script
by burra_ramakanth (Initiate) on Feb 02, 2012 at 10:50 UTC
    Thanks for your reply monks!!!!

    Hi im getting the following error message in the browser/log file

    Software error:

    Expires: Wed, 01 Feb 2012 09:38:46 GMT

    Date: Thu, 02 Feb 2012 09:38:46 GMT

    Content-Type: text/html; charset=ISO-8859-1

    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

    <html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">

    <head>

    <title>Error</title>

    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

    </head>

    <body bgcolor="white">

    Error in calling HTML script---no output method defined.

    Known Output Methods:

    • GENFILE
    • SENDFILE
    • ORAFILE

    </body>

    </html> at /desktop/mydocs/cgi-bin/myfolder/myperlfile.pl line 190.

    My code part is as follows:

    if ($output == 0) {

    my $error = <<END;

    Error in calling HTML script---no output method defined.

    Known Output Methods:

    • GENFILE
    • SENDFILE
    • ORAFILE
    END

    wlErrorMail(\%FDG, $error);

    die(wlErrorPage($error));---- Line number 190

    }

    }

    Let me know if you need further more information..... Regards Ramakanth
[reply]

      Now you know where to start debugging, you should investigate what wlErrorPage does, or why it behaves differently on the two servers. I advised you to read quite a few links, please do so. Also post formatting guidelines are displayed when you compose and again when you preview a post, please don't ignore them.

[reply]
[d/l]

        Thanks for your reply!!!!. I got resolved the above issue by placing the required perl module in perl path and specificed the path in myperlfile.pl

        I got another error i.e Undefined subroutine &main::getDate

        My code line corresponding to the above error is my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst,$century,$amon,$aday) = &getDate;

        Can anyone suggest me how to resolve the above undefined error..Thanks in advance!!!

        Regards Ramakanth

[reply]

In Section Seekers of Perl Wisdom