open(IN, "/some/file") || die "Cant open /some/file: $!\n";
chomp( ($capture) = grep(/^$some_match/, <IN>) );
close(IN);