1. foreach $source (keys %allData)
2. {
3.    foreach $dest ( keys $allData{$source} )
4.    {
5.        #access the values
6.    }
7. }