Хранилища Subversion geo-modmetar

Редакция

Редакция 3 | Весь файл | Не учитывать пробелы | Содержимое файла | Авторство | Последнее изменение | Открыть журнал | RSS

Редакция 3 Редакция 4
Строка 1... Строка 1...
1 
#!/usr/bin/perl
1 
#!/usr/bin/perl
2 

            2
            

          

          

            3
            
# $Id: simple_dump.pl,v 1.1 2007/11/13 21:19:27 koos Exp $


            -
            
 

          

          

            4
            

            -
            
 

          

          

            5
            
# Example script for METAR.pm.


            3
            
# Example script for ModMETAR.pm.


          

          

            6
            

            4
            

          

          

            7
            
use Geo::ModMETAR;


            5
            
use Geo::ModMETAR;


          

          

            8
            

            6
            

          

          

            9
            
my $m = new Geo::ModMETAR;


            7
            
my $m = new Geo::ModMETAR;


          

          

            10
            
$m->metar("KFDY 251450Z 21012G21KT 8SM OVC065 04/M01 A3010 RMK 57014");


            8
            
$m->metar("KFDY 251450Z 21012G21KT 8SM OVC065 04/M01 A3010 RMK 57014");