Help for this page

Select Code to Download


  1. or download this
    .
    .
    ...
    .
    .
    .
    
  2. or download this
    my $params   = HFR::SeaSonde::FileOps->new_operation();
    
  3. or download this
       my $config_file = exists $args{config_file} ? $args{config_file} : 
    +$ENV{"HOME"}.'/acorn_perl.yml';
       $self           = LoadFile $config_file;
    
  4. or download this
    my @stations = @{$params->{codenames}->{codar_stations}};
    
  5. or download this
    foreach my $station (@stations) {
    my $table_type       = $params->{local}->{$station}->{realtime}->{tabl
    +e_type}; print $table_type."\n"; 
    } 
    exit;