$hash{$station}{$row}{$id} = $draw->{Value};

##</code><code>##

while ($hash{"STATION2"}{$row}{"ID1"} eq $hash{"STATION3"}{$row}{"ID1") {
     ........
}