[MacPerl] Q: use MacPerl

[Xah Lee <xah@best.com>]

I ran the following

#!perl -w

use strict;
use MacPerl;

my ($aa) = MakeFSSpec('APS600:T2:Perl files:unix learning notes');

print $aa;

----------------

and I got

----------------

# Subroutine MacPerl::SetFileInfo redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::GetFileInfo redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::Ask redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::Answer redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::Choose redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::Pick redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::Quit redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::FAccess redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::MakeFSSpec redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::MakePath redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Subroutine MacPerl::Volumes redefined.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 65535
# Modification of a read-only value attempted.
File 'APS1025:Apps:Programing:MacPerl 5.1.5r4 Ä:lib:MacPerl.pm'; Line 13
# BEGIN failed--compilation aborted.
File 'Untitled #2'; Line 4

-----------------

Could anyone explain? It doesn't appear that I've screwed up my MacPerl.
(I'm trying to learn package scheme)

 Xah, xah@best.com
 http://www.best.com/~xah/PageTwo_dir/MathPrograms_dir/mathPrograms.html
 Mountain View, CA, USA



***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch