my ($host) = $string =~ /((?<=Name:)[^ ]+)?/; my ($event) = $string =~ /((?<=Manager] )[^ ]+)/;