my $path = "/path/to/file_or_dir";
if (-f $path) {
    # this is a file
}
if (-d $path) {
    # this is a directory
}
[download]

PerlMonks graciously bestowed by Tim Vroom.
PerlMonks is a proud member of the The Perl Foundation.
Marvelous Managed Hosting and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.