in reply to matching multiline regular expressions
$_ = 'BASKET OPEN WEEKLY BASKET PRICE RISES TO 28.23 DOLLARS'; if (/BASKET\n\nOPEN WEEKLY BASKET PRICE RISES TO (\S+) DOLLARS/) { $price = $1; print "Price: $price\n"; } [download]