Re: [MacPerl] Size of a Resource Fork

[Chris Nandor <pudge@pobox.com>]

At 15.35 -0500 1998.11.14, William B. Birkett wrote:
>Does anyone know how to find the size of a resource fork with MacPerl?

This (in the MacPerl errata on my MacPerl page) gives the total file size:

     use Mac::Files;
     my $cat  = FSpGetCatInfo($file);
     my $size = $cat->ioFlLgLen() + $cat->ioFlRLgLen();

If you just take the ioFlRLgLen field, that'll be the resource fork size.
The other is the data fork size, obviously.  :)

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

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