Is this really what you want?

foreach (@{$no_priv_matches{$group}}) {
    print "\t@{$no_priv_matches{$group}}\n";
}
[download]

For each member of the array, you're printing the entire array? Seems like you'd want a dereferencing expression inside the loop there.