DateTime::Format::Epoch::MacOS (3pm)

  use DateTime::Format::Epoch::MacOS;

  my $dt = DateTime::Format::Epoch::MacOS->parse_datetime( 1051488000 );
  DateTime::Format::Epoch::MacOS->format_datetime($dt);
   # 1051488000

  my $formatter = DateTime::Format::Epoch::MacOS->new();

  my $dt2 = $formatter->parse_datetime( 1051488000 );

  $formatter->format_datetime($dt2);
   # 1051488000

This module can convert a DateTime object (or any object that can be converted to a DateTime object) to the number of seconds since the Mac \s-1OS\s0 epoch.

Note that the Mac \s-1OS\s0 epoch is defined in the local time zone. This means that these two pieces of code will print the same number of seconds, even though they represent two datetimes 6 hours apart:

$dt = DateTime->new( year => 2003, month => 5, day => 2, time_zone => 'Europe/Amsterdam' ); print $formatter->format_datetime($dt);

$dt = DateTime->new( year => 2003, month => 5, day => 2, time_zone => 'America/Chicago' ); print $formatter->format_datetime($dt);

Mac \s-1OS\s0 X is a Unix system, and uses the Unix epoch (1970-01-01T00:00:00). Use DateTime::Format::Epoch::Unix instead.

Most of the methods are the same as those in DateTime::Format::Epoch. The only difference is the constructor.

• new() Constructor of the formatter/parser object. It has no parameters.

Support for this module is provided via the [email protected] email list. See http://lists.perl.org/ for more details.

Eugene van der Pijll <[email protected]>

Copyright (c) 2003 Eugene van der Pijll. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

DateTime

[email protected] mailing list