foreach my $source ( keys %allData ) {
    foreach my $dest ( keys %{ $allData{$source} } ) {
        # access the values
    }
}