$PG{$3}{"$1-$2"}{$cou} = $4;

##</code><code>##

foreach $path3 ( keys %{$PG{$path1{$path2}}} )