invaderzard has asked for the wisdom of the Perl Monks concerning the following question:

Hi all, I'm trying to extract some information from a .dat file. The format of the information I'm trying to extract is this.

DR Pfam; PF00070; Pyr_redox; 2.

What I want is the PF00070 inside.

I tried several regex like (/(?<=DR\s\s\sPfam;\s\w\w\d\d\d\d\d)(.*)$/)



But none of them seem to work. Any help would be appreciated. Thanks!