my $pass = $user_data->{password}; my $user = $user_data->{user}; my @pass = split '', $pass; my @user = split '', $user; $user = join '', @user; $pass = join '', @pass;