bufr.pm:bufralter.pl_source

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
Next revision
Previous revision
Next revision Both sides next revision
bufr.pm:bufralter.pl_source [2011-04-01 11:26:56]
pals
bufr.pm:bufralter.pl_source [2016-04-18 07:56:20]
pals
Line 2: Line 2:
 #!/usr/bin/perl -w #!/usr/bin/perl -w
  
-# (C) Copyright 2010, met.no+# (C) Copyright 2010-2016 MET Norway
 # #
 # This program is free software; you can redistribute it and/or modify # This program is free software; you can redistribute it and/or modify
Line 90: Line 90:
     Geo::BUFR->set_tablepath($ENV{BUFR_TABLES});     Geo::BUFR->set_tablepath($ENV{BUFR_TABLES});
 } else { } else {
-    # If all else fails, use the libemos bufrtables+    # If all else fails, use the libbufr bufrtables
     Geo::BUFR->set_tablepath(DEFAULT_TABLE_PATH);     Geo::BUFR->set_tablepath(DEFAULT_TABLE_PATH);
 } }
Line 102: Line 102:
     $OUT = *STDOUT;     $OUT = *STDOUT;
 } }
 +binmode($OUT);
  
 # Change input separator to 'BUFR' # Change input separator to 'BUFR'
Line 326: Line 327:
  
 =pod =pod
 +
 +=encoding utf8
  
 =head1 SYNOPSIS =head1 SYNOPSIS
Line 363: Line 366:
 specified by the options provided. The modified file (text surrounding specified by the options provided. The modified file (text surrounding
 the BUFR messages will not be affected) will be printed to STDOUT the BUFR messages will not be affected) will be printed to STDOUT
-(unless C<--outfile> is set). None of the options (except --remove_sec2) +(unless C<--outfile> is set).
-will affect the content of optional sections if present.+
  
 Execute without arguments for Usage, with option C<--help> for some Execute without arguments for Usage, with option C<--help> for some
Line 408: Line 410:
    --compress 0|1   Set compression in section 3 to 0 or 1    --compress 0|1   Set compression in section 3 to 0 or 1
    --remove_sec2    Remove optional section 2 if present    --remove_sec2    Remove optional section 2 if present
-   --remove_qc      Remove all quality information,+   --remove_qc      Remove all quality control information,
                     i.e. remove all descriptors from 222000 on                     i.e. remove all descriptors from 222000 on
    --outfile <filename>    --outfile <filename>
Line 420: Line 422:
    --tablepath <path to BUFR tables>    --tablepath <path to BUFR tables>
                     Set path to BUFR tables (overrides $ENV{BUFR_TABLES})                     Set path to BUFR tables (overrides $ENV{BUFR_TABLES})
-   --verbose n      Set verbose level to n, 0<=n<=(default 0). Verbose+   --verbose n      Set verbose level to n, 0<=n<=(default 0). Verbose
                     output is sent to STDOUT, so ought to be combined with                     output is sent to STDOUT, so ought to be combined with
                     option --outfile                     option --outfile
Line 439: Line 441:
 =head1 COPYRIGHT =head1 COPYRIGHT
  
-Copyright (C) 2010 met.no+Copyright (C) 2010-2016 MET Norway
  
 =cut =cut
 +
 </code> </code>
  • bufr.pm/bufralter.pl_source.txt
  • Last modified: 2023-02-05 10:21:16
  • by pals