in reply to Multiline regex

my ($body) = $line =~ /^body:\s+(.*)\s+^attachment:/msi

In Section Seekers of Perl Wisdom