if (-e $file && -T $file) {
    print "bar";
}