$name =~ s/\s//g;