Help for this page
>perl -wMstrict -le "use List::Util qw(first); ... searching for gene '0': first found: '9999' all found: '9999'