...
open my $fh, '<', 'test.txt';
...