Редакция 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"); |