print "$user is in the hash. \n";
        @user_array = split(/ /, $p2i{$user});

        foreach (@user_array) {
        print "$_\n";
        }