Free datetime event sunrise software for linux

DateTime::Event::Sunrise is a Perl DateTime extension for computing the sunrise/sunset on a given day.

SYNOPSIS

use DateTime;
use DateTime::Event::Sunrise;

my $dt = DateTime->new( year => 2000,
month => 6,
day => 20,
);

my $sunrise = DateTime::Event::Sunrise ->sunrise (
longitude =>-118,
latitude =>33,
altitude => -0.833,
iteration => 1
);

my $sunset = DateTime::Event::Sunrise ->sunset (
longitude =>-118,
latitude =>33,
altitude => -0.833,
iteration => 1
);

my $tmp_rise = $sunrise->next( $dt );

my $dt2 = DateTime->new( year => 2000,
month => 12,
day => 31,
);

# iterator
my $dt_span = DateTime::Span->new( start =>$dt1, end=>$dt2 );
my $set = $sunrise->intersection($dt_span);
my $iter = $set->iterator;
while ( my $dt = $iter->next ) {
print ,$dt->datetime;
}

# is it day or night?
my $day_set = DateTime::SpanSet->from_sets(
start_set => $sunrise, end_set => $sunset );
print $day_set->contains( $dt ) ? day : night;

my $dt = DateTime->new( year => 2000, month => 6, day => 20, time_zone => America/Los_Angeles, );
my $sunrise = DateTime::Event::Sunrise ->new( longitude =>-118 , latitude => 33, altitude => -0.833, iteration => 1
);

my $tmp = $sunrise->sunrise_sunset_span($dt); print "Sunrise is:" , $tmp->start->datetime , "n"; print "Sunset is:" , $tmp->end->datetime;
my $dt1 = $sunrise->sunrise_datetime( $dt ); print "Sunrise is:" , $dt1->datetime , "n"; my $dt2 = $sunrise->sunset_datetime( $dt ); print "Sunset is:" , $dt2->datetime , "n";

DateTime::Event::Cron is a DateTime extension for generating recurrence sets from crontab lines and files.

SYNOPSIS

use DateTime::Event::Cron;

# DateTime::Set construction from crontab line
$crontab = */3 15 1-10 3,4,5 */2;
$set = DateTime::Event::Cron->from_cron($crontab);
$iter = $set->iterator(after => DateTime->now);
while (1) {
my $next = $iter->next;
my $now = DateTime->now;
sleep(($next->subtract_datetime_absolute($now))->seconds);
# do stuff...
}

# List of DateTime::Set objects from crontab file
@sets = DateTime::Event::Cron->from_crontab(file => /etc/crontab);
$now = DateTime->now;
print "Now: ", $now->datetime, "n";
foreach (@sets) {
my $next = $_->next($now);
print $next->datetime, "n";
}

# DateTime::Set parameters
$crontab = * * * * *;

$now = DateTime->now;
%set_parms = ( after => $now );
$set = DateTime::Event::Cron->from_cron(cron => $crontab, %set_parms);
$dt = $set->next;
print "Now: ", $now->datetime, " and next: ", $dt->datetime, "n";

# Spans for DateTime::Set
$crontab = * * * * *;
$now = DateTime->now;
$now2 = $now->clone;
$span = DateTime::Span->from_datetimes(
start => $now->add(minutes => 1),
end => $now2->add(hours => 1),
);
%parms = (cron => $crontab, span => $span);
$set = DateTime::Event::Cron->from_cron(%parms);
# ...do things with the DateTime::Set

# Every RTFCT relative to 12am Jan 1st this year
$crontab = 7-10 6,12-15 10-28/2 */3 3,4,5;
$date = DateTime->now->truncate(to => year);
$set = DateTime::Event::Cron->from_cron(cron => $crontab, after => $date);

# Rather than generating DateTime::Set objects, next/prev
# calculations can be made directly:

# Every day at 10am, 2pm, and 6pm. Reference date
# defaults to DateTime->now.
$crontab = 10,14,18 * * * *;
$dtc = DateTime::Event::Cron->new_from_cron(cron => $crontab);
$next_datetime = $dtc->next;
$last_datetime = $dtc->previous;
...

# List of DateTime::Event::Cron objects from
# crontab file
@dtc = DateTime::Event::Cron->new_from_crontab(file => /etc/crontab);

# Full cron lines with user, such as from /etc/crontab
# or files in /etc/cron.d, are supported and auto-detected:
$crontab = * * * * * gump /bin/date;
$dtc = DateTime::Event::Cron->new(cron => $crontab);

# Auto-detection of users is disabled if you explicitly
# enable/disable via the user_mode parameter:
$dtc = DateTime::Event::Cron->new(cron => $crontab, user_mode => 1);
my $user = $dtc->user;
my $command = $dtc->command;

# Unparsed original cron entry
my $original = $dtc->original;

DateTime is a date and time object.

SYNOPSIS

use DateTime;

$dt = DateTime->new( year => 1964,
month => 10,
day => 16,
hour => 16,
minute => 12,
second => 47,
nanosecond => 500000000,
time_zone => Asia/Taipei,
);

$dt = DateTime->from_epoch( epoch => $epoch );
$dt = DateTime->now; # same as ( epoch => time() )

$year = $dt->year;
$month = $dt->month; # 1-12 - also mon

$day = $dt->day; # 1-31 - also day_of_month, mday

$dow = $dt->day_of_week; # 1-7 (Monday is 1) - also dow, wday

$hour = $dt->hour; # 0-23
$minute = $dt->minute; # 0-59 - also min

$second = $dt->second; # 0-61 (leap seconds!) - also sec

$doy = $dt->day_of_year; # 1-366 (leap years) - also doy

$doq = $dt->day_of_quarter; # 1.. - also doq

$qtr = $dt->quarter; # 1-4

# all of the start-at-1 methods above have correponding start-at-0
# methods, such as $dt->day_of_month_0, $dt->month_0 and so on

$ymd = $dt->ymd; # 2002-12-06
$ymd = $dt->ymd(/); # 2002/12/06 - also date

$mdy = $dt->mdy; # 12-06-2002
$mdy = $dt->mdy(/); # 12/06/2002

$dmy = $dt->dmy; # 06-12-2002
$dmy = $dt->dmy(/); # 06/12/2002

$hms = $dt->hms; # 14:02:29
$hms = $dt->hms(!); # 14!02!29 - also time

$is_leap = $dt->is_leap_year;

# these are localizable, see Locales section
$month_name = $dt->month_name; # January, February, ...
$month_abbr = $dt->month_abbr; # Jan, Feb, ...
$day_name = $dt->day_name; # Monday, Tuesday, ...
$day_abbr = $dt->day_abbr; # Mon, Tue, ...

$epoch_time = $dt->epoch;
# may return undef if the datetime is outside the range that is
# representable by your OSs epoch system.

$dt2 = $dt + $duration_object;

$dt3 = $dt - $duration_object;

$duration_object = $dt - $dt2;

$dt->set( year => 1882 );

$dt->set_time_zone( America/Chicago );

$dt->set_formatter( $formatter );

DateTime is a class for the representation of date/time combinations, and is part of the Perl DateTime project. For details on this project please see http://datetime.perl.org/. The DateTime site has a FAQ which may help answer many "how do I do X?" questions. The FAQ is at http://datetime.perl.org/faq.html.

It represents the Gregorian calendar, extended backwards in time before its creation (in 1582). This is sometimes known as the "proleptic Gregorian calendar". In this calendar, the first day of the calendar (the epoch), is the first day of year 1, which corresponds to the date which was (incorrectly) believed to be the birth of Jesus Christ.

The calendar represented does have a year 0, and in that way differs from how dates are often written using "BCE/CE" or "BC/AD".

For infinite datetimes, please see the DateTime::Infinite module.

DateTime::Locale is a Perl module with localization support for DateTime.pm.

SYNOPSIS

use DateTime::Locale;

my $loc = DateTime::Locale->load(en_GB);

print $loc->native_locale_name, "n",
$loc->long_datetime_format, "n";

# but mostly just things like ...

my $dt = DateTime->now( locale => fr );
print "Aujourdhui le mois est " . $dt->month_name, "n":

DateTime::Locale is primarily a factory for the various locale subclasses. It also provides some functions for getting information on available locales.

If you want to know what methods are available for locale objects, then please read the DateTime::Locale::Base documentation.

DateTime::Cron::Simple is a Perl module that can parse a cron entry and check against current time.

SYNOPSIS

use DateTime::Cron::Simple;

$c = DateTime::Cron::Simple->new($cron);

$boolean = $c->validate_time;

$c->new_cron($cron);

This module is a quick and dirty way to determine if a cron time format is valid for the current date and time.

A cron entry follows the cron format from crontab(5).

The validate_time function uses the current date and time for comparison, but will also accept a valid DateTime object as a parameter.

EXAMPLE

use DateTime::Cron::Simple;

$c = DateTime::Cron::Simple->new(0-59/2 10,12 * * 5);

if($c->validate_time) { ... }

$c->new_cron(* * 1 * 0);

if($c->validate_time) { ... }

Liquid Sunrise is a SuperKaramba theme for people who want to monitor sunrise and sundown without having to (wake up and) look out of the window. Ideal for photographers for planning phototours.

If you want to use a background picture (e.g. included bg.png or bg2.png) just edit line 2 in the theme file: bg.png is activated by default in the German version, bg2.png in the English version as example.

Image of morning and evening sun is taken from liquid weather theme Kapsules, meridian sun is from default liquid theme.

Based on the Crystal Sunrise Theme by Daniel Pathmaperuma (http://www.kde-look.org/content/show.php/crystal_sunrise?content=54805) which is based on sunrise-theme by Flavio Cardone (http://www.kde-look.org/content/show.php/sunrise?content=25030) - an even more shameless port ;).

This theme needs the sunwait application: http://www.risacher.org/sunwait/

BTW: If you are looking for a french version: chepioq has adapted my theme:
http://www.kde-look.org/content/show.php/liquid+sunrise+french?content=55332

App::datetime is a date and time considerations.

Most Enterprise development includes processing of dates and times. There are many date and time modules on CPAN, and choosing the right one can be confusing. There are no special perl data types for dates and times, so some direction is needed.

The short answer is that we recommend the following for most common date and time operations.

Class::Date
Class::Date::Rel

However, other modules are appropriate in certain circumstances. So for the longer answer, read on.

PERL 5 LANGUAGE SUPPORT

The native Perl 5 datetime type is an integer. It is not different from other integers in any way other than how it is used. It represents the number of non-leap seconds since January 1, 1970 UTC (the "Epoch" at GMT). The following internal Perl function gets the current time.

$current_time = time;
$current_time = time();

Other Perl functions that return this "datetime" integer are

($dev, $ino, $mode, $nlink, $uid, $gid, $redev, $size,
$atime, $mtime, $ctime, $blksize, $blocks) = stat($filename);
($dev, $ino, $mode, $nlink, $uid, $gid, $redev, $size,
$atime, $mtime, $ctime, $blksize, $blocks) = lstat($filename);

where $atime, $mtime, and $ctime are the same kind of integers, representing the access time, modification time, and change time of a file.

These $time values may be converted to human-readable form using the following internal perl functions. (See the "perlfunc" man page for more information.)

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime($time);
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($time);

Furthermore, the current time zone needs to be accessed through the environment variable, "TZ".

$timezone = $ENV{TZ};

This leaves the Perl developer with lots of work to do in order to process dates.

Formatting dates for output

Parsing dates on input

Comparing dates

Date math (addition, subtraction)

Other calendar-specific functions (i.e. holidays, days of week, etc)

Numerous modules have been posted to CPAN allowing the Perl developer to accomplish these tasks. However, they have pros and cons related to the following features.

Internationalization

Speed

Portability

Ranges of Dates Supported

Compliance with Perl Styleguide (function naming)

Rose::DateTime is a Perl module with DateTime helper functions and objects.

SYNOPSIS

use Rose::DateTime::Util qw(:all);

$now = parse_date(now);
$then = parse_date(12/25/2001 6pm);

$date_text = format_date($then, "%D at %T %p");

...

use Rose::DateTime::Parser;

$parser = Rose::DateTime::Parser->new(time_zone => UTC);

$date = $parser->parse_date(12/25/1999);

The Rose::DateTime::* modules provide a few convenience functions and objects for use with DateTime dates.

Rose::DateTime::Util contains a simple date parser and a slightly customized date formatter.

Rose::DateTime::Parser encapsulates a date parser with an associated default time zone.

This module (Rose::DateTime) exists mostly to provide a version number for CPAN. See the individual modules for some actual documentation.