for my $num (keys %users) {
    print "The details for number $num are user:$users{$num}[0], comments: $users{$num}[1]\n";
}