if (-f $ARGV[0]) {
        print "file";
} elsif(-d $ARGV[0]) {
        print "dir";
}