$location = $1  if ($data =~ /-(.*)/i);
$location = $1  if ($location =~ /-(.*)/i);