in reply to File Test operators, option -T

You should always check the return value of open. If the programme is not able to open the file, $fh will be undefined. 
open my $fh, '<', 'input2.txt' or die $!;

[download]
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

In Section Seekers of Perl Wisdom