open my $fh, '<', $path or die $!;