You need to learn yourself how stuff works. You cannot bother other people all the time which you can trivially look up yourself in your learning materials or the official documentation.

my (@locations) = "Location: England
                Location: Scotland
                Location: Finland " =~ /Location: (\p{General_Category
+=Letter}+)/gms;
print $locations[0]; # England
print $locations[1]; # Scotland
print $locations[2]; # Finland
[download]

update: made \pL more explicit