open $INPUT, '<', 'data.txt' or die $!;