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

Редакция

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

Редакция 4 Редакция 17
1 
#!/usr/bin/perl
1 
#!/usr/bin/perl
2 

            2
            

          

          

            3
            
# Example script for ModMETAR.pm.


            3
            
# Example script for ModMETAR.pm.


          

          

            4
            

            4
            

          

          

            5
            
use Geo::ModMETAR;


            5
            
use Geo::ModMETAR;


          

          

            6
            

            6
            

          

          

            7
            
my $m = new Geo::ModMETAR;


            7
            
my $m = new Geo::ModMETAR;


          

          

            8
            
$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");


          

          

            9
            
$m->dump;


            9
            
$m->dump;


          

          

            10
            
exit;


            10
            
exit;


          

          

            11
            
 


            11