Deberíamos tener algo más de información de cómo se van a comportar los campos que aparecen en esas líneas, pero, si asumimos que
- queremos quedarnos a partir del separador '|' que está detrás de una referencia numérica,
- hasta justo antes del primer espacio en blanco,
entonces podemos resolverlo con esta expresión:
Using perl Syntax Highlighting
$linea = '>gi|207855516|ref|NC_011294.1|:2565-3494 Salmonella enterica subsp. enterica serovar Enteritidis str. P125109 chromosome, complete genome';
$my($extracto) = $linea =~ /\d+(\|.+?) /;
print "[$extracto]\n"; # [|ref|NC_011294.1|:2565-3494]
Coloreado en 0.003 segundos, usando
GeSHi 1.0.8.4