Re: [MacPerl] $0 oddity

[Alan Fry <ajf@afco.demon.co.uk>]

Chris Nandor writes 16 Dec 1997 08:15:50 -0500:
>At 00.40 12/16/97, Brian L. Matthews wrote:
>>#!perl
>>$me = $0;
>>print "\$0 is '$0'\n";
>>print "\$me is '$me'\n";
>>$0 =~ s/.*://;
>>$me =~ s/.*://;
>>print "\$0 is '$0'\n";
>>print "\$me is '$me'\n";
>>
>>If I save this in the file 'name test.pl' on the desktop then run it, I get:
>>
>>$0 is 'Macintosh HD:Desktop Folder:name test.pl'
>>$me is 'Macintosh HD:Desktop Folder:name test.pl'
>>$0 is 'name te'
>>$me is 'name test.pl'
>>
>>The third line appears incorrect.
>
>Confirmed here.  It appears that no matter what I name it, the name is
>truncated at 7 characters.

FWIW it works properly with MacPerl 5.1.5r4CFM68K and MacOS 7.5.1 on a
68030 Powerbook.

Alan Fry



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