Help for this page
jsdlkjalsd same_text = 1, jhhj, jhjk = 256, iuqoi, uereoiu, sjksdh, s +ame_text = 2, lkkj, lksj = 6287 uwie same_text = 2, sdaj, jsdgd, sksd
For the key "1" the value should be "jhhj, jhjk" For the key "2" the value should be "lkkj, lksj , sdaj, jsdgd"
use Data::Dumper; ... } map { print "$_ -- @{$hash{$_}} \n "; } keys %hash;