my $corrected_string = $string;
$corrected_string =~ s/_/ /g;