[Bioperl-l] EMBL file with space before quoted, multi-line qualifier value

[Adam Sjøgren]

Adam writes:

> -        my( $qualifier, $value ) = m{^/([^=]+)(?:=(.+))?}
> +        my( $qualifier, $value ) = m{^/([^=]+)*(?:=\s*(.+))?}
                                                 |
I got a '*' to many there -----------------------'

I (only) meant to add the '\s*' after the '=':

+        my( $qualifier, $value ) = m{^/([^=]+)(?:=\s*(.+))?}

Sorry!

-- 
                                                          Adam Sjøgren
                                                    adsj at novozymes.com