[MacPerl] CGI.pm 2.25 and MacPerl

[Stephane Jose <jose.stephane@uqam.ca>]

Hi all,

Anybody who used CGI.pm successfully with MacPerl, please help me...

I want to modify some of my cgi scripts that worked with 'cgi-lib' to
use the much more powerful 'CGI.pm'. The version I have (2.25) is supposed
to behave well with MacPerl (I am using version 5.0.7r1m). I placed the
files correctly and configured the $OS variable to MAC. So far so good...

I tried a sample script to test the library but I keep getting the
following error message:

# # # Can't find string terminator "END_OF_AUTOLOAD" anywhere before EOF.
File 'HD Interne 700:Projets:Mirroir Site WEB:cgi-bin:librairies:CGI.pm';
Line 505
BEGIN failed--compilation aborted.
File 'HD Interne 700:Projets:Mirroir Site WEB:cgi-bin:test.cgi'; Line 892

Of course nothing else is printed...

Here is the test script I used:

####### start of test script #######

#!/usr/bin/perl

BEGIN {
    unshift(@INC,"HD Interne 700:Projets:Mirroir Site WEB:cgi-bin:librairies");
}

use CGI qw(:standard);

print header;
print start_html('A Simple Example'),
    h1('A Simple Example'),
    start_form,
    "What's your name? ",textfield('name'),
    p,
    "What's the combination?",
    p,
    checkbox_group(-name=>'words',
                   -values=>['eenie','meenie','minie','moe'],
                   -defaults=>['eenie','minie']),
    p,
    "What's your favorite color? ",
    popup_menu(-name=>'color',
               -values=>['red','green','blue','chartreuse']),
    p,
    submit,
    end_form,
    hr;

if (param()) {
    print
        "Your name is",em(param('name')),
        p,
        "The keywords are: ",em(join(", ",param('words'))),
        p,
        "Your favorite color is ",em(param('color')),
        hr;
}
print a({href=>'../cgi_docs.html'},'Go to the documentation');

####### end of test script #######




                ___S__t__Ž__p__h__a__n__e_____J__o__s__e___

                        mailto:jose.stephane@uqam.ca
                    http://www.er.uqam.ca/nobel/m206474/