Help for this page
open(IN, $file) || die "Can't open $file: $!"; binmode(IN); my $version; ... } } close(IN);