$matches = $string =~ s/_/ /g;
print $matches;