if rindex($rln, 'E0')
{
    close $out_fh;
    next;
}