Re: [MacPerl] Chaser

["Bill Jones" <bill@fccj.org>]

> #!perl -w
> 
> # Chaser v1.0
> # by Kevin Reid <kpreid@ibm.net>
> #
> # Use the mouse to drive around and catch the moving objects.
> # Don't run into walls.
> # Press a key to stop.
> #
> # Performance tips:
> #  1. Get a faster Mac.
> #  2. Reduce screen size and color depth.
> #
> # Revision history
> # 1.0
> #   First release.

<snipped some useful looking code.>

# Bareword "new_GIHdl" not allowed while "strict subs" in use, <DATA> chunk
1.
File '(eval 5)'; Line 48
# Bareword "inverseQuadraticFade" not allowed while "strict subs" in use,
<DATA> chunk 1.
File '(eval 5)'; Line 50
# Bareword "inverseQuadraticFade" not allowed while "strict subs" in use,
<DATA> chunk 1.
File '(eval 5)'; Line 71
# Bareword "new_GIHdl" not allowed while "strict subs" in use, <DATA> chunk
1.
File '(eval 5)'; Line 80
# Bareword "inverseQuadraticFade" not allowed while "strict subs" in use,
<DATA> chunk 1.
File '(eval 5)'; Line 81
# Bareword "inverseQuadraticFade" not allowed while "strict subs" in use,
<DATA> chunk 1.
File '(eval 5)'; Line 104
# Undefined subroutine &main::FS_Start called, <DATA> chunk 1.
File 'MacOS:Desktop Folder:Chaser.MacPerl'; Line 303


Ouch, ouch.  The subs are sinking...

=)
-FCCJ Data Security Group-
___________________________________________________________________
 FCCJ  501 W. State St.  Jacksonville, FL 32202   1 (904) 632-3089

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