You're almost there! Try the following:
use strict; use warnings; my $abc = <<END; The following ABB products and versions are affected: • ABB Interlink Module: Versions 4.6 through 4.9 • IRC5 OPC Server: Versions up to and including 5.14.01 • PC SDK: Versions up to and including 5.14.01 • PickMaster 3: Versions up to and including 3.3 • PickMaster 5: Versions up to and including 5.13 • Robot Communications Runtime: Versions up to and including 5.14.01 • RobotStudio: Versions supporting IRC5 up to and including 5.14.01 • RobView 5: Works together with other products listed here. • WebWare SDK: Versions 4.6 through 4.9 • WebWare Server: Versions 4.6 through 4.91 END print "$1\n" if $abc =~ /(?:PickMaster 3:\s+)([^\n]+)/s;
Output:
Versions up to and including 3.3
In reply to Re: parsing a line
by Kenosis
in thread parsing a line
by kurtcobain
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |