| Geo :: Track :: Log. GEO :: TRACK :: LOG´Â Æ®·¢ ·Î±×¸¦ ³ªÅ¸³»´Â PERL ¸ðµâÀ̸ç Æ®·¢ ·Î±× ¹× ³¯Â¥¸¦ ±â¹ÝÀ¸·Î À§Ä¡¸¦ ã½À´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
Geo :: Track :: Log. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~rgibson/Geo-Track-Log-0.02/lib/Geo/Track/Log.pm
Geo :: Track :: Log. ű×
Geo :: Track :: Log. ¼³¸í
Geo :: Track :: Log´Â Æ®·¢ ·Î±×¸¦ ³ªÅ¸³»´Â Perl ¸ðµâÀ̸ç Æ®·¢ ·Î±× ¹× ³¯Â¥¸¦ ±â¹ÝÀ¸·Î À§Ä¡¸¦ ã½À´Ï´Ù. GEO :: TRACK :: LOG´Â Æ®·¢ ·Î±×¸¦ ³ªÅ¸³»´Â PERL ¸ðµâÀ̸ç Æ®·¢ ·Î±× ¹× DATENNOPSIS¸¦ ±â¹ÝÀ¸·Î À§Ä¡¸¦ ã´Â À§Ä¡¸¦ ã½À´Ï´Ù. GEO :: TRACK :: LOG; ³» $ log = new geo :: track :: log; # Æ®·¢ ·Î±×¿¡ Á¡À» Ãß°¡ÇϽʽÿÀ. $ log-> addpoint ({timestamp => 2004-12-2512:00 ', lat => 0.0, long => 0.0,}); $ log-> addpoint ({timestamp => 2004-12-2513:00:00 ', lat => 0.0, long => 1.0,}); ³» ($ PT, $ SPT, $ ePT) = $ log-> wherewasi ( '2004-12-2512:30:00') ÇÑ ¹ø¿¡ ¿ì¸®ÀÇ À§Ä¡¸¦ ¾òÀ¸½Ê½Ã¿À. ¶Ç´Â (µ¿ÀǾî) My ($ PT, $ SPT, $ ePT) = $ log-> interpolate ( '2004-12-2512:30:00'); (ÀÚ¼¼ÇÑ ¼³¸í ÂüÁ¶) Garnix Çü½ÄÀÇ Æ®·¢ ·Î±×·Îµå $ log-> loadtrackFromgarnix ( 'ÆÄÀÏ ÇÚµé'); Garnix Çü½Ä ÆÄÀÏ¿¡¼ ¿þÀÌ Æ÷ÀÎÆ®·Îµå $ log-> loadwayfromgarnix ( 'ÆÄÀÏ ÇÚµé'); ÆãÅ° Garnix ¶óÀÎ Æ÷¸Ë ¼öÁ¤ My $ PT = $ LOG-> FixGarnixTrackline (QQ (44 ¡Æ 5 '33.23 "-123? 5'0.07"148.0 WGS8400 : 50 : 19-2004 / 07 / 12 ;)) GPX (GPS XML) Çü½Ä ÆÄÀϷεå $ log-> loadtrackFromgpx ( 'ÆÄÀÏ ÇÚµé'); ½Ã°£º°·Î °¡Àå ºü¸¥ Á¡À» ¹ÝȯÇϽʽÿÀ. $ PT = $ log-> mintimestamp (); ½Ã°£º°·Î ÃֽŠÁöÁ¡À» ¹ÝȯÇϽʽÿÀ. $ PT = $ log-> maxtimestamp (); Points $ SPT ¹× $ DPTÀÇ ½Ã°£ »çÀÌ¿¡ ¾î¶² ºñÀ²Àº ½Ã°£´ç $ dÀԴϱî? ³» $ PCT = $ self-> getpercent ($ d, $ spt, $ ept); ¿ä±¸ »çÇ× : ¡¤ Perl.
Geo :: Track :: Log. °ü·Ã ¼ÒÇÁÆ®¿þ¾î