print OUTPUT "\n", $headings;
        foreach ( $line =~ m/$sequence/i ) {
            if ( $line =~ m/$sequence(.{11})(.{11})$sequence/ ) {
                print OUTPUT "\n", $1, "\n", $2;
            }
            $local_count++;
        }