because you are usin the for of shellscript to have the name of the file in $file and trying to use this in a perl program... you could do this?

perl -e 'for $file(@ARGV){open FILE, "<$file"; $_ = join "", <FILE>; p
+rint "true" if /^t[^\n]*\Z/msi;close FILE}' *.txt
[download]