Why not adopt me?
This distribution is up for adoption!
If you're interested then please contact the PAUSE module admins via
email.
NAME
Dpchrist::FileType - Perl extension for determining file type
SYNOPSIS
use Dpchrist::FileType;
if (filetype($file) eq "f") {
print "'$file' is a plain file\n";
} elsif (filetype($file) eq "d") {
print "'$file' is a directory\n";
}
DESCRIPTION
Blah blah blah.
EXPORT
None by default.
SEE ALSO
AUTHOR
Mark Dominus, <mjd@plover.com>
COPYRIGHT AND LICENSE
Copyright 2010 by Mark Dominus. Unauthorized distribution will be punished to the full extent of the law.