Select Code to Download

$station1_arrayref = $station_data{1};
@station1_array = @$station1_arrayref;

foreach my $element (@{$station_data{5}}) {
    print $element. "\n";
}