in reply to PerlApp Error - /PerlApp/strict.pm did not return a true value.

That's pretty weird. Does the script runs ok as a perl script ? (I'm assuming it does.)

Assuming it's version 1.03 of strict.pm, does it make any difference if, in strict.pm, you change: 
1;
__END__

[download]
to: 
1;

__END__

[download]
(That is, insert an empty line between the "1;" and the "__END__".)
Other than that, if you don't find the answer here, you should try posting to ActiveState's PDK mailing list.

Cheers,
Rob

Replies are listed 'Best First'.
Re^2: PerlApp Error - /PerlApp/strict.pm did not return a true value.
by kartlee (Initiate) on May 26, 2008 at 17:03 UTC
    Hi Rob,

    Thanks for the reply. The code runs fine as a perl script but as perlapp executable it throws the above error.

    Useragent.pm and strict.pm contains only the following code ( modified to find the actual problem ): 

    UserAgent.pm

package LWP::UserAgent;

1;

=pod

=head1 NAME

LWP::UserAgent - Uniform Resource Locators

=head1 SYNOPSIS

 $u1 = LWP::UserAgent->new($str, $base);
 $u2 = $u1->abs;
 =cut

    [download]
    strict.pm

1;

    [download]

    If we remove the pod lines from UserAgent.pm, the executable works fine. Really wierd seeing this behavior. I have posted in Active State's PDK forum, still need to hear a reply from them. Any clue from the following code where the problem lies?

    -Karthik
[reply]
[d/l]
[select]

      Is there really a space before =cut in UserAgent.pm? If so, remove it -- it's possible that Perl thinks that your strict is all POD.

[reply]
[d/l]

In Section Seekers of Perl Wisdom