#                                            =
my %hash = map { $_, ($string =~ m/$_:(.+?)\s+$z/)} @keys;
#                                            =