1DateTime::Format::EpochU:s:eArctCiovnetDriirbeuctDteaodtreyPT(ei3rm)le:D:oFcourmmeantt:a:tEipoonch::ActiveDirectory(3)
2
3
4
6 DateTime::Format::Epoch::ActiveDirectory - Active Directory epoch
7 seconds
8
10 use DateTime::Format::Epoch::ActiveDirectory;
11
12 my $dt = DateTime::Format::Epoch::ActiveDirectory
13 ->parse_datetime( 1051488000 );
14
15 DateTime::Format::Epoch::ActiveDirectory->format_datetime($dt);
16 # 1051488000
17
18 my $formatter = DateTime::Format::Epoch::ActiveDirectory->new();
19 my $dt2 = $formatter->parse_datetime( 1051488000 );
20 $formatter->format_datetime($dt2);
21
23 This module can convert a DateTime object (or any object that can be
24 converted to a DateTime object) to the number of seconds since the
25 epoch used in Microsoft Active Directory.
26
27 Note that this epoch is defined in the local time zone. This means that
28 these two pieces of code will print the same number of seconds, even
29 though they represent two datetimes 6 hours apart:
30
31 $dt = DateTime->new( year => 2003, month => 5, day => 2,
32 time_zone => 'Europe/Amsterdam' );
33 print $formatter->format_datetime($dt);
34
35 $dt = DateTime->new( year => 2003, month => 5, day => 2,
36 time_zone => 'America/Chicago' );
37 print $formatter->format_datetime($dt);
38
40 Most of the methods are the same as those in DateTime::Format::Epoch.
41 The only difference is the constructor.
42
43 • new()
44
45 Constructor of the formatter/parser object. It has no parameters.
46
48 Support for this module is provided via the datetime@perl.org email
49 list. See http://lists.perl.org/ for more details.
50
52 Eugene van der Pijll <pijll@gmx.net>
53
55 Copyright (c) 2004 Eugene van der Pijll. All rights reserved. This
56 program is free software; you can redistribute it and/or modify it
57 under the same terms as Perl itself.
58
60 DateTime
61
62 datetime@perl.org mailing list
63
64
65
66perl v5.32.1 20D2a1t-e0T1i-m2e7::Format::Epoch::ActiveDirectory(3)