DateTime :: Event :: Sunrise dateTime :: Event :: Sunrise ist eine Perl-DateTime-Erweiterung, um den Sonnenaufgang / den Sonnenuntergang an einem bestimmten Tag zu berechnen.
Jetzt downloaden

DateTime :: Event :: Sunrise Ranking & Zusammenfassung

DateTime :: Event :: Sunrise Stichworte

Perl-Modul Verlängerung Terminzeit DateTime-Erweiterung Berechnen des Sonnenaufgangs

DateTime :: Event :: Sunrise Beschreibung

DateTime :: Event :: Sunrise ist eine Perl-DateTime-Erweiterung, um den Sonnenaufgang / den Sonnenuntergang an einem bestimmten Tag zu berechnen. DateTime :: Event :: Sunrise ist eine Perl-DateTime-Erweiterung, um den Sonnenaufgang / den Sonnenuntergang an einem bestimmten Tag zu berechnen. Synopsis verwenden Sie dateTime; Verwenden Sie dateTime :: Event :: Sonnenaufgang; Meine $ dt = dateTime-> NEU (Jahr => 2000, Monat => 6, Tag => 20,); Mein $ Sunrise = DateTime :: Event :: Sunrise -> Sonnenaufgang (Longitude => '- 118', Latitude => '33', Höhe => '-0.833', Iteration => '1'); Mein $ Sunset = DateTime :: Event :: Sunrise -> Sonnenuntergang (Longitude => '- 118', Latitude => '33', Höhe => '-0.833', Iteration => '1'); mein $ tmp_rise = $ sunrise-> next ($ dt); Meine $ dt2 = dateTime-> NEU (Jahr => 2000, Monat => 12, Tag => 31,); # Iterator My $ dt_span = dateTime :: span-> neu (Start => $ dt1, ende => $ dt2); mein $ set = $ Sunrise-> Kreuzung ($ dt_span); mein $ iter = $ set-> iterator; während (mein $ dt = $ iter-> next) {drucken '', $ dt-> dateTime; } # Ist es Tag oder Nacht? Mein $ tag_set = dateTime :: Spanset-> from_sets (start_set => $ sunrise, end_set => $ sunset); $ drucken $ tag_set-> enthält ($ dt)? 'Tag': 'Nacht'; mein $ dt = dateTime-> neu (jahr => 2000, monat => 6, day => 20, time_zone => 'amerika / los_angeles',); mein $ sunrise = dateTime :: Ereignis :: Sunrise -> NEU (Longitude => '- 118', Latitude => '33', Höhe => '-0.833', Iteration => '1'); mein $ tmp = $ Sunrise-> sunrise_sunset_span ($ dt); drucken "Sunrise ist:", $ tmp-> start-> datetime, "n"; drucken "Sunset ist:", $ tmp-> end-> dateTime; mein $ dt1 = $ sunrise-> sunrise_datetime ($ dt); drucken "Sunrise ist:", $ dt1-> dateTime, "n"; mein $ dt2 = $ Sunrise-> sunset_datetime ($ dt); drucken "Sunset ist:", $ dt2-> dateTime, "n"; Anforderungen: · Perl.

DateTime :: Event :: Sunrise Zugehörige Software