- or download this
>perl -wMstrict -le
"my $s = '_+0GAA__+1GAA__+2GGAA__+3GGGAA_';
...
"
'_+0GAA__+1GAA__+2GGAA__+3GGGAA_'
'_GAA__AA__AA__AA_'
- or download this
>perl -wMstrict -le
"my $s = '_+0GAA__+1GAA__+2GGAA__+3GGGAA_';
...
"
'_+0GAA__+1GAA__+2GGAA__+3GGGAA_'
'_GAA__AA__AA__AA_'