.
.
.
stations : [ ... , ghed, lanc, ... ]
.
.
.
ghed :
table_type : lluv rdl9
pattern_type : measured
lanc :
table_type : lluv rdl8
pattern_type : ideal
.
.
.
####
my $params = HFR::SeaSonde::FileOps->new_operation();
####
my $config_file = exists $args{config_file} ? $args{config_file} : $ENV{"HOME"}.'/acorn_perl.yml';
$self = LoadFile $config_file;
####
my @stations = @{$params->{codenames}->{codar_stations}};
####
foreach my $station (@stations) {
my $table_type = $params->{local}->{$station}->{realtime}->{table_type}; print $table_type."\n";
}
exit;