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