C:\>perl -e "my $f=qq(<testfile.log); print ref($f); if (-f $f) { print qq(AS thinks this is a file\n); }"
AS thinks this is a file

C:\>dir "<testfile.log"
 Volume in drive C has no label.
 Volume Serial Number is D0C3-B79D

 Directory of C:\

19/09/2003  15:03                 0 testfile.log
               1 File(s)              0 bytes
               0 Dir(s)   1,764,376,576 bytes free

C:\>dir "<<testfile.log"
 Volume in drive C has no label.
 Volume Serial Number is D0C3-B79D

 Directory of C:\

19/09/2003  15:03                 0 testfile.log
               1 File(s)              0 bytes
               0 Dir(s)   1,764,376,576 bytes free

C:\>dir "<<<<<<<<<testfile.log"
 Volume in drive C has no label.
 Volume Serial Number is D0C3-B79D

 Directory of C:\

19/09/2003  15:03                 0 testfile.log
               1 File(s)              0 bytes
               0 Dir(s)   1,764,376,576 bytes free