in reply to minimal greed, revisited
$source =~ m/.*(user: 2\s*name: .* address: .*?\n)/s; [download]