in reply to Derefferencing the out put from XMLin()

Hmmm, fairly odd behavior. I think changing two lines will make it do what you expect:

# Was if ($$user_hash{SERVICE}->{$service}){ # Equivalent to if (${$user_hash}{SERVICE}->{$service}){ if (exists $user_hash->{SERVICE}{$service}) {
# Was my @users = @$user_hash{SERVICE}->{$service}->{USER}; my @users = @{ $user_hash->{SERVICE}{$service}{USER} };

Note that the proper way to access a hashref is $hash->{blah}.

antirice    
The first rule of Perl club is - use Perl
The
ith rule of Perl club is - follow rule i - 1 for i > 1