if ($line =~ /\s\*(.*?)\*loc/gimx ){