print "File is binary\n" if (-B);
print "File is a text file\n" if (-T);

##</code><code>##

print "File is binary\n" if (!-T);
print "File is a text file\n" if (!-B);