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