Select Code to Download

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

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