Re: [MacPerl-Toolbox] Re: [MacPerl-Modules] Help: Dynamic list dialog boxes from MacPerl

[Ronald J Kimball <rjk@linguist.dartmouth.edu>]

On Fri, Jul 28, 2000 at 02:53:19PM +0200, Peter Hartmann wrote:

> I wonder, however, what the warning
> 
> # Macintosh HD:Desktop Folder:#!perl -w use Mac--FilŠ-Clip syntax OK
> # Can't call method "dd_uninstall" without a package or object reference.
> File 'Macintosh HD:Desktop Folder:#!perl -w use Mac--FilŠ-Clip'; Line 32
> # END failed--cleanup aborted.
> 
> is supposed to mean.
> 
> Line 32 is
> 
> END {
> 	$glue->dd_uninstall;
> 
> Why should END get executed - as it seems - when doing nothing more 
> than a syntax check?

In perl5.004, END{} is called, even after a syntax check, to balance out
the BEGIN{} calls.

In perl5.005, END{} is only called after a program finishes running.  There
are also two new special subroutines; STOP{} is called at the end of the
compilation phase, and INIT{} is called at the beginning of the runtime
phase.


Since MacPerl is based on 5.004, you could avoid the warning by changing
your END block to:

$glue->dd_uninstall if $glue;


Ronald

==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-toolbox-request@macperl.org