my ($result) = map /(something)/, split /\n/, $content;