my ($name) = m/Sequence (.*) consists/;