DateTime :: حدث :: شروق الشمس

DateTime :: حدث :: Sunrise هو ملحق Didetime Perl لحساب شروق الشمس / غروب الشمس في يوم معين.
التحميل الان

DateTime :: حدث :: شروق الشمس الترتيب والملخص

الإعلانات

  • Rating:
  • رخصة:
  • Perl Artistic License
  • السعر:
  • FREE
  • اسم الناشر:
  • Ron Hill
  • موقع ويب الناشر:
  • http://search.cpan.org/~rkhill/Astro-Sunrise-0.91/Sunrise.pm

DateTime :: حدث :: شروق الشمس العلامات


DateTime :: حدث :: شروق الشمس وصف

DateTime :: حدث :: Sunrise هو ملحق Didetime Perl لحساب شروق الشمس / غروب الشمس في يوم معين. DateTime :: حدث :: Sunrise هو ملحق Didetime Perl لحساب شروق الشمس / غروب الشمس في يوم معين. استخدام DateTime؛ استخدم DateTime :: حدث :: Sunrise؛ بلدي DT = DTETIME-> جديد (السنة => 2000، شهر => 6، اليوم => 20،)؛ بلدي $ Sunrise = DateTime :: Event :: Sunrise -> شروق الشمس (خط الطول => '- 118'، Latitude => '33'، الارتفاع => '-0.833'، التكرار => '1')؛ My Sunset = DateTime :: حدث :: Sunrise -> غروب الشمس (خط الطول => '- 118'، Latitude => '33'، الارتفاع => '-0.833'، التكرار => '1')؛ بلدي $ tmp_rise = شروق الشمس-> التالي ($ DT)؛ بلدي $ DT2 = DateTime-> جديد (السنة => 2000، شهر => 12، Day => 31،)؛ # Imerator My $ DT_SPAN = DateTime :: SPAN-> جديد (Start => $ DT1، END => $ DT2)؛ بلدي مجموعة $ = $ sunrise-> تقاطع ($ dt_span)؛ بلدي دولار iter = $ Set-> Imerator؛ بينما (بلدي $ DT = $ iTer-> التالي) {print ''، $ DT-> DateTime؛ } # هل هو يوم أو ليلة؟ بلدي $ Day_set = DateTime :: Spanset-> from_sets (start_set => $ sunrise، end_set => $ sunset)؛ طباعة $ Day_set-> يحتوي على ($ DT)؟ "اليوم": "الليل"؛ بلدي $ DT = DateTime-> جديد (السنة => 2000، شهر => 6، اليوم => 20، TIME_ZONE => 'America / Los_angeles'،)؛ بلدي $ شروق الشمس = تاريخ التاريخ :: حدث :: Sunrise -> جديد (خط الطول => '- 118'، Latitude => '33'، الارتفاع => '-0.833'، التكرار => '1')؛ بلدي $ tmp = $ sunrise-> sunrise_sunset_span ($ DT)؛ طباعة "شروق الشمس هو:"، $ TMP-> البدء-> DateTime، "N"؛ طباعة "غروب الشمس:"، $ TMP-> نهاية -> DateTime؛ بلدي $ DT1 = $ شروق الشمس-> sunrise_datetime ($ DT)؛ طباعة "شروق الشمس هو:"، DT1-> DateTime، "N"؛ بلدي $ DT2 = شروق الشمس-> Sunset_Datetime ($ DT)؛ طباعة "غروب الشمس:"، DT2-> DateTime، "N"؛ متطلبات: perl.


DateTime :: حدث :: شروق الشمس برامج ذات صلة