Next refresh should show more results. ( run in 2.612 )
view release on metacpan or search on metacpan
lib/AMF/Connection.pm view on Meta::CPAN
return bless($self, $class);
};
# plus add paramters, referer, user agent, authentication/credentials ( see also SecureAMFChannel stuff ),
# plus timezone on retunred dates to pass to de-serializer - see AMF3 spec saying "it is suggested that time zone be queried independnetly as needed" - unelss local DateTime default to right locale!
# we pass the string, and let Storable::AMF to parse the options into a scalar - see Input/OutputStream and Storable::AMF0 documentation
sub setInputAMFOptions {
my ($class, $options) = @_;
view release on metacpan or search on metacpan
lib/API/Assembla.pm view on Meta::CPAN
BEGIN {
$API::Assembla::VERSION = '0.03';
}
use Moose;
use DateTime::Format::ISO8601;
use LWP::UserAgent;
use URI;
use XML::XPath;
use API::Assembla::Space;
lib/API/Assembla.pm view on Meta::CPAN
my $space = $xp->find('/space')->pop;
my $name = $space->findvalue('name')."";
return API::Assembla::Space->new(
id => $space->findvalue('id').'',
created_at => DateTime::Format::ISO8601->parse_datetime($space->findvalue('created-at').''),
name => $name,
description => $space->findvalue('description').'',
);
}
lib/API/Assembla.pm view on Meta::CPAN
my $name = $space->findvalue('name')."";
$objects{$name} = API::Assembla::Space->new(
id => $space->findvalue('id').'',
created_at => DateTime::Format::ISO8601->parse_datetime($space->findvalue('created-at').''),
name => $name,
description => $space->findvalue('description').'',
);
}
lib/API/Assembla.pm view on Meta::CPAN
my $ticket = $xp->find('/ticket')->pop;
return API::Assembla::Ticket->new(
id => $ticket->findvalue('id').'',
created_on => DateTime::Format::ISO8601->parse_datetime($ticket->findvalue('created-on').''),
description => $ticket->findvalue('description').'',
number => $ticket->findvalue('number').'',
priority => $ticket->findvalue('priority').'',
status_name => $ticket->findvalue('status-name').'',
summary => $ticket->findvalue('summary').''
lib/API/Assembla.pm view on Meta::CPAN
my $id = $ticket->findvalue('id').'';
$objects{$id} = API::Assembla::Ticket->new(
id => $id,
created_on => DateTime::Format::ISO8601->parse_datetime($ticket->findvalue('created-on').''),
description => $ticket->findvalue('description').'',
number => $ticket->findvalue('number').'',
priority => $ticket->findvalue('priority').'',
status_name => $ticket->findvalue('status-name').'',
summary => $ticket->findvalue('summary').''
view release on metacpan or search on metacpan
lib/API/Google/GCal.pm view on Meta::CPAN
my $gapi = API::Google::GCal->new({ tokensfile => 'config.json' });
my $user = 'someuser@gmail.com';
my $calendar_id = 'ooqfhagr1a91u1510ffdf7vfpk@group.calendar.google.com';
my $timeZone = 'Europe/Moscow';
my $event_start = DateTime->now->set_time_zone($timeZone);
my $event_end = DateTime->now->add_duration( DateTime::Duration->new( hours => 2) );
$gapi->refresh_access_token_silent($user); # inherits from API::Google
$gapi->get_calendars($user);
$gapi->get_calendars($user, ['id', 'summary']); # return only specified fields
lib/API/Google/GCal.pm view on Meta::CPAN
my $event_data = {};
$event_data->{summary} = 'Exibition';
$event_data->{description} = 'Amazing cats exibition';
$event_data->{location} = 'Angels av. 13';
$event_data->{start}{dateTime} = DateTime::Format::RFC3339->format_datetime($event_start); # '2016-11-11T09:00:00+03:00' format
$event_data->{end}{dateTime} = DateTime::Format::RFC3339->format_datetime($event_end);
$event_data->{start}{timeZone} = $event_data->{end}{timeZone} = $timeZone; # not obligatory
$gapi->add_event($user, $calendar_id, $event_data);
my $freebusy_data = {
user => $user,
calendarId => $calendar_id,
dt_start => DateTime::Format::RFC3339->format_datetime($event_start),
dt_end => DateTime::Format::RFC3339->format_datetime($event_end),
timeZone => 'Europe/Moscow'
};
$gapi->busy_time_ranges($freebusy_data);
view release on metacpan or search on metacpan
applications/collector-test.pl view on Meta::CPAN
$thour = int ($duration / 3600);
$tmin = int (int ($duration % 3600) / 60);
$tsec = int ($duration % 60);
$duration = sprintf("%02d:%02d:%02d", $thour, $tmin, $tsec);
} else {
my ($tyear, $tmonth, $tday, $thour, $tmin, $tsec, @startDateTime, @endDateTime, @diffDateTime);
($tyear, $tmonth, $tday) = split(/\//, $startDate);
($thour, $tmin, $tsec) = split(/\:/, $startTime);
@startDateTime = ($tyear, $tmonth, $tday, $thour, $tmin, $tsec);
($tyear, $tmonth, $tday) = split(/\//, $endDate);
($thour, $tmin, $tsec) = split(/\:/, $endTime);
@endDateTime = ($tyear, $tmonth, $tday, $thour, $tmin, $tsec);
@diffDateTime = Delta_DHMS(@startDateTime, @endDateTime);
$duration = sprintf("%02d:%02d:%02d", $diffDateTime[1], $diffDateTime[2], $diffDateTime[3]);
}
# my ($outputData, $performanceData) = split(/\|/, $returnStatus, 2);
my $_returnStatus = reverse $returnStatus;
my ($_outputData, $_performanceData) = reverse split(/\|/, $_returnStatus, 2);
view release on metacpan or search on metacpan
lib/AWS/Networks.pm view on Meta::CPAN
package AWS::Networks;
use Moose;
use JSON;
use HTTP::Tiny;
use DateTime;
our $VERSION = '0.01';
has url => (
is => 'ro',
lib/AWS/Networks.pm view on Meta::CPAN
lazy => 1,
);
has sync_token => (
is => 'ro',
isa => 'DateTime',
default => sub {
return DateTime->from_epoch( epoch => shift->netinfo->{ syncToken } );
},
lazy => 1,
);
has networks => (
lib/AWS/Networks.pm view on Meta::CPAN
Returns the URL from which the information was retrieved. Returns undef on filtered datasets
=head2 sync_token
Returns a DateTime object created from the current timestamp of the syncToken reported from the service
=head2 networks
Returns an ArrayRef with HashRefs following the following structure:
view release on metacpan or search on metacpan
share/AXLSoap.xsd view on Meta::CPAN
</xsd:annotation>
</xsd:element>
<xsd:element name="trivialCredCheck" type="xsd:boolean" nillable="false"/>
</xsd:sequence>
</xsd:complexType>
<xsd:complexType name="XDateTimeSetting">
<xsd:sequence minOccurs="0">
<xsd:element name="name" type="axlapi:String50"/>
<xsd:element name="dateTemplate" type="axlapi:String50"/>
<xsd:element name="timeZone" type="xsd:string"/><!--This field is of the type axl:XTimeZone in AXLEnums.xsd-->
</xsd:sequence>
share/AXLSoap.xsd view on Meta::CPAN
</xsd:annotation>
</xsd:element>
<xsd:element name="autoSearchSpaceName" type="axlapi:String50"/>
</xsd:choice>
<xsd:choice>
<xsd:element name="dateTimeSetting" type="axlapi:XDateTimeSetting">
<xsd:annotation>
<xsd:documentation>Only the uuid attribute is read by the AXL API. Not Nullable.</xsd:documentation>
</xsd:annotation>
</xsd:element>
<xsd:element name="dateTimeSettingName" type="axlapi:String50"/>
view release on metacpan or search on metacpan
lib/Acme/2zicon.pm view on Meta::CPAN
use 5.008001;
use strict;
use warnings;
use Carp qw(croak);
use DateTime;
our $VERSION = "0.7";
my @members = qw(
MatobaKarin
view release on metacpan or search on metacpan
lib/Acme/BABYMETAL/Base.pm view on Meta::CPAN
package Acme::BABYMETAL::Base;
use strict;
use warnings;
use DateTime;
use base qw(Class::Accessor);
our $VERSION = '0.03';
__PACKAGE__->mk_accessors(qw(
lib/Acme/BABYMETAL/Base.pm view on Meta::CPAN
$self->{$_} = $info{$_} for keys %info;
$self->{name_ja} = $self->family_name_ja . $self->first_name_ja;
$self->{name_en} = $self->first_name_en . ' ' . $self->family_name_en;
my ($year, $month, $day) = ($self->{birthday} =~ /^(\d{4})-(\d{2})-(\d{2})$/);
$self->{age} = (DateTime->now - DateTime->new(
year => $year,
month => $month,
day => $day,
))->years;
view release on metacpan or search on metacpan
examples/update100.pl view on Meta::CPAN
# -------------------------------------
# Library Modules
use CPAN::Changes;
#use Data::Dumper;
use DateTime;
use File::Basename;
use Getopt::Long;
use IO::File;
use Template;
use WWW::Mechanize;
examples/update100.pl view on Meta::CPAN
push @{$tvars{LIST2}}, sprintf " %2d. %3d %s%s%s", $cnt++, $new{$inx}{count}, $new{$inx}{pause}, (' ' x $pad), $new{$inx}{name};
}
# calculate copyright
$tvars{COPYRIGHT} = '2014';
my $year = DateTime->now->year;
$tvars{COPYRIGHT} .= "-$year" if($year > 2014);
# calculate version
$file = '../Changes';
my $changes = CPAN::Changes->load( $file );
examples/update100.pl view on Meta::CPAN
my $version = $releases[-1]->{version};
$version += 0.01;
$tvars{VERSION} = sprintf "%.2f", $version;
# update Changes file
my $release = CPAN::Changes::Release->new( version => $tvars{VERSION}, date => DateTime->now->ymd );
for my $group (qw(insert update delete)) {
next unless($changes{$group});
$release->add_changes(
{ group => $groups{$group} },
view release on metacpan or search on metacpan
examples/update100.pl view on Meta::CPAN
# -------------------------------------
# Library Modules
use CPAN::Changes;
#use Data::Dumper;
use DateTime;
use File::Basename;
use Getopt::Long;
use IO::File;
use Template;
use WWW::Mechanize;
examples/update100.pl view on Meta::CPAN
push @{$tvars{LIST2}}, sprintf " %2d. %3d %s%s%s", $cnt++, $new{$inx}{count}, $new{$inx}{pause}, (' ' x $pad), $new{$inx}{name};
}
# calculate copyright
$tvars{COPYRIGHT} = '2014';
my $year = DateTime->now->year;
$tvars{COPYRIGHT} .= "-$year" if($year > 2014);
# calculate version
$file = '../Changes';
my $changes = CPAN::Changes->load( $file );
examples/update100.pl view on Meta::CPAN
my $version = $releases[-1]->{version};
$version += 0.01;
$tvars{VERSION} = sprintf "%.2f", $version;
# update Changes file
my $release = CPAN::Changes::Release->new( version => $tvars{VERSION}, date => DateTime->now->ymd );
for my $group (qw(insert update delete)) {
next unless($changes{$group});
$release->add_changes(
{ group => $groups{$group} },
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/BKB/Japanese.pm view on Meta::CPAN
package Acme::CPANLists::Import::BKB::Japanese;
our $DATE = '2017-03-27'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [https://www.lemoda.net/perl/cpan-japanese-language/index.html] (retrieved on 2017-03-27). Visit the URL for the full contents.",entries=>[{module=>"Da...
1;
# ABSTRACT: CPAN modules for dealing with the Japanese language (2012)
__END__
lib/Acme/CPANLists/Import/BKB/Japanese.pm view on Meta::CPAN
This list is generated by extracting module names mentioned in [https://www.lemoda.net/perl/cpan-japanese-language/index.html] (retrieved on 2017-03-27). Visit the URL for the full contents.
=over
=item * L<DateTime::Calendar::Japanese::Era>
=item * L<Lingua::JA::FindDates>
=item * L<Lingua::JA::Moji>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PERLANCAR/GetoptModules.pm view on Meta::CPAN
package Acme::CPANLists::Import::PERLANCAR::GetoptModules;
our $DATE = '2016-12-26'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [https://perlancar.wordpress.com/2016/12/02/getopt-modules-02-getoptstd/] (retrieved on 2016-12-26). Visit the URL for the full contents.",entries=>[{m...
1;
# ABSTRACT: Modules mentioned in PERLANCAR's mini-article series on Getopt modules (2016)
__END__
lib/Acme/CPANLists/Import/PERLANCAR/GetoptModules.pm view on Meta::CPAN
=item * L<App::Cmd>
=item * L<Config::Any>
=item * L<DateTime>
=item * L<Moose>
=item * L<MooseX::App::Cmd>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2004.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2004;
our $DATE = '2016-11-07'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2004/] (retrieved on 2016-11-07). Visit the URL for the full contents.",entries=>[{module=>"DateTime"},{module=>"DateTime::Durat...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2004
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2004.pm view on Meta::CPAN
This list is generated by extracting module names mentioned in [http://perladvent.org/2004/] (retrieved on 2016-11-07). Visit the URL for the full contents.
=over
=item * L<DateTime>
=item * L<DateTime::Duration>
=item * L<DateTime::Format::Duration>
=item * L<DateTime::Format::HTTP>
=item * L<Acme::Colour>
=item * L<Term::ANSIColor>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2005.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2005;
our $DATE = '2016-11-07'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2005/] (retrieved on 2016-11-07). Visit the URL for the full contents.",entries=>[{module=>"Acme::Code::FreedomFighter"},{module...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2005
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2005.pm view on Meta::CPAN
=item * L<Date::Christmas>
=item * L<Date::Parse>
=item * L<DateTime>
=item * L<Devel::DProf>
=item * L<Devel::Size>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2006.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2006;
our $DATE = '2016-11-07'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2006/] (retrieved on 2016-11-07). Visit the URL for the full contents.",entries=>[{module=>"Devel::FastProf"},{module=>"Devel::S...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2006
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2006.pm view on Meta::CPAN
=item * L<criticism>
=item * L<DBD::AnyData>
=item * L<DateTime::Calendar::Discordian>
=back
=head1 HOMEPAGE
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2007_12_16.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2007_12_16;
our $DATE = '2016-11-07'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2007/16/] (retrieved on 2016-11-07). Visit the URL for the full contents.",entries=>[{module=>"DateTime::TimeZone"}],summary=>"M...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2007 (day 16)
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2007_12_16.pm view on Meta::CPAN
This list is generated by extracting module names mentioned in [http://perladvent.org/2007/16/] (retrieved on 2016-11-07). Visit the URL for the full contents.
=over
=item * L<DateTime::TimeZone>
=back
=head1 HOMEPAGE
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2012.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2012;
our $DATE = '2016-11-06'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2012/] (retrieved on 2016-11-06). Visit the URL for the full contents.",entries=>[{module=>"File::Path"},{module=>"File::Spec"},...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2012
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2012.pm view on Meta::CPAN
=item * L<DDP>
=item * L<Data::Printer>
=item * L<DateTime>
=item * L<Digest>
=item * L<Digest::MD5>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2013.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2013;
our $DATE = '2016-11-06'; # DATE
our $VERSION = '0.002'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2013/] (retrieved on 2016-11-06). Visit the URL for the full contents.",entries=>[{module=>"RDF::Query"},{module=>"RDF::Query::C...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2013
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2013.pm view on Meta::CPAN
=item * L<Beam::Emitter>
=item * L<Moo>
=item * L<DateTime::Duration>
=item * L<Time::Duration>
=item * L<Time::Duration::Object>
lib/Acme/CPANLists/Import/PerlAdvent/2013.pm view on Meta::CPAN
=item * L<Role::HasPayload::Merged>
=item * L<String::Errf>
=item * L<DateTime>
=item * L<DateTime::Moonpig>
=item * L<Acme::Boom>
=item * L<Devel::cst>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PerlAdvent/2014.pm view on Meta::CPAN
package Acme::CPANLists::Import::PerlAdvent::2014;
our $DATE = '2016-11-06'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://perladvent.org/2014/] (retrieved on 2016-11-06). Visit the URL for the full contents.",entries=>[{module=>"File::Temp"},{module=>"Test::TempDir...
1;
# ABSTRACT: Modules mentioned in Perl Advent Calendar 2014
__END__
lib/Acme/CPANLists/Import/PerlAdvent/2014.pm view on Meta::CPAN
=item * L<namespace::autoclean>
=item * L<Data::ICal>
=item * L<Data::ICal::DateTime>
=item * L<DateTime>
=item * L<DateTime::Format::ICal>
=item * L<Capture::Tiny>
=item * L<Devel::Size>
lib/Acme/CPANLists/Import/PerlAdvent/2014.pm view on Meta::CPAN
=item * L<Plack::App::Path::Router::Custom>
=item * L<CLDR::Number>
=item * L<DateTime::Locale>
=item * L<Geo::Region>
=item * L<Locale::CLDR>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/DatesPart1.pm view on Meta::CPAN
package Acme::CPANLists::Import::DatesPart1;
our $DATE = '2016-12-28'; # DATE
our $VERSION = '0.03'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in the article [http://blogs.perl.org/users/buddy_burden/2015/09/a-date-with-cpan-part-1-state-of-the-union.html] (retrieved on 2016-07-19). For the full ...
1;
# ABSTRACT: CPAN modules for processing dates - Part 1 (2015)
__END__
lib/Acme/CPANLists/Import/DatesPart1.pm view on Meta::CPAN
=item * L<Class::Date>
=item * L<DBIx::Class>
=item * L<DBIx::Class::InflateColumn::DateTimeX::Immutable>
=item * L<Date::Calc>
=item * L<Date::Format>
lib/Acme/CPANLists/Import/DatesPart1.pm view on Meta::CPAN
=item * L<Date::Piece>
=item * L<Date::Simple>
=item * L<DateTime>
=item * L<DateTime::Format::DateManip>
=item * L<DateTime::Moonpig>
=item * L<DateTimeX::Immutable>
=item * L<Panda::Date>
=item * L<Time::Local>
view release on metacpan or search on metacpan
},
"runtime" : {
"requires" : {
"Date::Calc" : "0",
"Date::DayOfWeek" : "0",
"DateTime" : "0",
"Time::DayOfWeek" : "0",
"Time::Moment" : "0",
"perl" : "5.010001",
"strict" : "0",
"warnings" : "0"
},
"x_benchmarks" : {
"requires" : {
"Date::Calc" : "0",
"Date::DayOfWeek" : "0",
"DateTime" : "0",
"Time::DayOfWeek" : "0",
"Time::Moment" : "0"
},
"x_benchmarks" : {
"Date::Calc" : "0",
"Date::DayOfWeek" : "0",
"DateTime" : "0",
"Time::DayOfWeek" : "0",
"Time::Moment" : "0"
}
},
"x_lists" : {
"x_lists" : {
"Date::Calc" : "0",
"Date::DayOfWeek" : "0",
"DateTime" : "0",
"Time::DayOfWeek" : "0",
"Time::Moment" : "0"
}
},
"x_mentions" : {
"x_mentions" : {
"Date::Calc" : "0",
"Date::DayOfWeek" : "0",
"DateTime" : "0",
"Time::DayOfWeek" : "0",
"Time::Moment" : "0"
}
}
},