else {
            my $modelrgx = $model . "?"; # make last character "optional"
            $modelrgx =~ s/[1Il]/[1Il]/g;
            $modelrgx =~ s/[0O]/[0O]/g;
            if ( /$modelrgx/ ) {
                handle_a_match( $orig, $model );
                $orig = '';
                last;
            }
        }