How about:

my ($note) = $we =~ m/Note:\s*(.+?)(?:Pre|Attrib|Link)/sgi
[download]