The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

pgetfinfo -- GetFileInfo, implemented as perl script

SYNOPSIS

pgetfinfo [-a[<attrib-letter>] | -t | -c | -d | -m] <path>

DESCRIPTION

When no switch is set, all avaible information on the path specified is printed to STDOUT.

-a [<attrib-letter>]

Prints attributes only. When no attrib-letter is specified, it prints all attributes. If spefifed, it prints "1" if any one the attribute is set or "0" otherwise.

Attrib-letters are as follows;

  A   Alias file
  V   Invisible*
  B   Bundle
  S   System (name locked)
  T   Stationary
  C   Custom icon*
  L   Locked
  I   Inited*
  N   No INIT resources
  M   Shared (can run multiple times)
  E   Hidden extension*
  D   Desktop*

Note: Options/attributes marked with an asterisk (*) are allowed with folders

-t

prints file type only

-c

prints file creator only.

-d

prints creation date only

-m

prints modification date only

AUTHOR

Dan Kogai <dankogai@dan.co.jp>

SEE ALSO

File::Copy "Developer/Tools/GetFileInfo" "Developer/Tools/SetFile"

COPYRIGHT

Copyright 2002-2005 Dan Kogai <dankogai@dan.co.jp>

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

2 POD Errors

The following errors were encountered while parsing the POD:

Around line 90:

'=item' outside of any '=over'

Around line 131:

You forgot a '=back' before '=head1'