Result:
found more than 560 distributions - search limited to the first 2001 files matching your query
( run in 1.246 )
File-FormatIdentification-Pronom
view release on metacpan or search on metacpan
t/DROID_SignatureFile_V111.xml view on Meta::CPAN
<FileFormat ID="1135" MIMEType="text/x-vCalendar"
Name="VCalendar format" PUID="fmt/387">
<InternalSignatureID>572</InternalSignatureID>
<Extension>vcs</Extension>
</FileFormat>
<FileFormat ID="1136" MIMEType="text/calendar"
Name="Internet Calendar and Scheduling format" PUID="fmt/388">
<InternalSignatureID>573</InternalSignatureID>
<Extension>ics</Extension>
</FileFormat>
<FileFormat ID="1137" Name="Log ASCII Standard Format"
File-Maker
view release on metacpan or search on metacpan
t/File/Data/Secs2.pm view on Meta::CPAN
and that the real originators of the SECS-II yielded
and allowed Tony Blair to take illegal credit for
inventing SECS-II.
After all the practical definition of politics is
getting your own way.
Julius Ceasar invented the Julian calendar and the month of July,
Augustus Ceasar the month of Auguest,
Al Gore the information highway and
Tony Blair not only SECS-II but SECS-I and High-Speed SECS.
=head2 SECSII Format
File-MimeInfo-Simple
view release on metacpan or search on metacpan
lib/File/MimeInfo/Simple.pm view on Meta::CPAN
ica: application/x-ica
icb: image/x-tga
ice: x-conference/x-cooltalk
icns: image/x-icns
ico: image/x-ico
ics: text/calendar
idl: text/x-idl
ief: image/ief
iff: image/x-iff
iges: model/iges
igs: model/iges
lib/File/MimeInfo/Simple.pm view on Meta::CPAN
stml: application/vnd.sealedmedia.softseal.html
stw: application/vnd.sun.xml.writer.template
sty: text/x-tex
sub: text/x-mpsub
sun: image/x-sun-raster
sus: application/vnd.sus-calendar
susp: application/vnd.sus-calendar
sv4cpio: application/x-sv4cpio
sv4crc: application/x-sv4crc
svg: image/svg+xml
svgz: image/svg+xml-compressed
swf: application/x-shockwave-flash
lib/File/MimeInfo/Simple.pm view on Meta::CPAN
url: text/x-uri
ustar: application/x-ustar
vala: text/x-vala
vbk: audio/vnd.nortel.vbk
vcf: text/x-vcard
vcs: text/x-vcalendar
vct: text/directory
vda: image/x-tga
vhd: text/x-vhdl
vhdl: text/x-vhdl
vis: application/vnd.visionary
File-Package
view release on metacpan or search on metacpan
t/File/Data/Secs2.pm view on Meta::CPAN
and that the real originators of the SECS-II yielded
and allowed Tony Blair to take illegal credit for
inventing SECS-II.
After all the practical definition of politics is
getting your own way.
Julius Ceasar invented the Julian calendar and the month of July,
Augustus Ceasar the month of Auguest,
Al Gore the information highway and
Tony Blair not only SECS-II but SECS-I and High-Speed SECS.
=head2 SECSII Format
File-Revision
view release on metacpan or search on metacpan
t/File/Data/Secs2.pm view on Meta::CPAN
and that the real originators of the SECS-II yielded
and allowed Tony Blair to take illegal credit for
inventing SECS-II.
After all the practical definition of politics is
getting your own way.
Julius Ceasar invented the Julian calendar and the month of July,
Augustus Ceasar the month of Auguest,
Al Gore the information highway and
Tony Blair not only SECS-II but SECS-I and High-Speed SECS.
=head2 SECSII Format
File-SmartNL
view release on metacpan or search on metacpan
t/File/Data/Secs2.pm view on Meta::CPAN
and that the real originators of the SECS-II yielded
and allowed Tony Blair to take illegal credit for
inventing SECS-II.
After all the practical definition of politics is
getting your own way.
Julius Ceasar invented the Julian calendar and the month of July,
Augustus Ceasar the month of Auguest,
Al Gore the information highway and
Tony Blair not only SECS-II but SECS-I and High-Speed SECS.
=head2 SECSII Format
File-SubPM
view release on metacpan or search on metacpan
t/File/Data/Secs2.pm view on Meta::CPAN
and that the real originators of the SECS-II yielded
and allowed Tony Blair to take illegal credit for
inventing SECS-II.
After all the practical definition of politics is
getting your own way.
Julius Ceasar invented the Julian calendar and the month of July,
Augustus Ceasar the month of Auguest,
Al Gore the information highway and
Tony Blair not only SECS-II but SECS-I and High-Speed SECS.
=head2 SECSII Format
File-Where
view release on metacpan or search on metacpan
t/File/Data/Secs2.pm view on Meta::CPAN
and that the real originators of the SECS-II yielded
and allowed Tony Blair to take illegal credit for
inventing SECS-II.
After all the practical definition of politics is
getting your own way.
Julius Ceasar invented the Julian calendar and the month of July,
Augustus Ceasar the month of Auguest,
Al Gore the information highway and
Tony Blair not only SECS-II but SECS-I and High-Speed SECS.
=head2 SECSII Format
Finance-Alpaca
view release on metacpan or search on metacpan
lib/Finance/Alpaca.pm view on Meta::CPAN
my $tx = $s->ua->build_tx( GET => $s->endpoint . '/v2/clock' );
$tx = $s->ua->start($tx);
return to_Clock( $tx->result->json );
}
sub calendar ( $s, %params ) {
my $params = '';
$params .= '?' . join '&', map {
$_ . '='
. ( ref $params{$_} eq 'Time::Moment' ? $params{$_}->to_string() : $params{$_} )
} keys %params if keys %params;
my $tx = $s->ua->build_tx( GET => $s->endpoint . '/v2/calendar' . $params );
$tx = $s->ua->start($tx);
return @{ ( ArrayRef [Calendar] )->assert_coerce( $tx->result->json ) };
}
sub assets ( $s, %params ) {
lib/Finance/Alpaca.pm view on Meta::CPAN
The clock endpoint serves the current market timestamp, whether or not the
market is currently open, as well as the times of the next market open and
close.
=head2 C<calendar( [...] )>
my @days = $camelid->calendar(
start => Time::Moment->now,
end => Time::Moment->now->plus_days(14)
);
for my $day (@days) {
say sprintf '%s the market opens at %s Eastern',
$day->date, $day->open;
}
Returns a list of L<Finance::Alpaca::Struct::Calendar> objects.
The calendar endpoint serves the full list of market days from 1970 to 2029.
The following parameters are accepted:
=over
lib/Finance/Alpaca.pm view on Meta::CPAN
=item C<end> - The last date to retrieve data for (inclusive); Time::Moment object or RFC3339 string
=back
Both listed parameters are optional. If neither is provided, the calendar will
begin on January 1st, 1970.
=head2 C<assets( [...] )>
say $_->symbol
Finance-Bank-Bankwest
view release on metacpan or search on metacpan
t/fixtures/google.html view on Meta::CPAN
(function(){try{var a=window.gbar;a.mcf("pm",{p:"2469003,Jb_,7,,"});}catch(e){window.gbar&&gbar.logger&&gbar.logger.ml(e,{"_sn":"cfg.init"});}})();
(function(){try{var a=window.gbar;a.mcf("mm",{s:"1"});}catch(e){window.gbar&&gbar.logger&&gbar.logger.ml(e,{"_sn":"cfg.init"});}})();
(function(){try{var d=window.gbar.i.i;var e=window.gbar;var f=e.i;var g=f.c("1",0),h=/\bgbmt\b/,k=function(a){try{var b=document.getElementById("gb_"+g),c=document.getElementById("gb_"+a);b&&f.l(b,h.test(b.className)?"gbm0l":"gbz0l");c&&f.k(c,h.test(...
n(a)},q=function(){if(window.google&&window.google.sn){var a=/.*hp$/;return a.test(window.google.sn)?"":"1"}return"-1"};e.rp=q;e.slp=k;e.qs=p;e.qsi=n;}catch(e){window.gbar&&gbar.logger&&gbar.logger.ml(e,{"_sn":"cfg.init"});}})();
(function(){try{window.gbar.rdl();}catch(e){window.gbar&&gbar.logger&&gbar.logger.ml(e,{"_sn":"cfg.init"});}})();
</script> </head><body class="hp" onload="try{if(!google.j.b){document.f&&document.f.q.focus();document.gbqf&&document.gbqf.q.focus();}}catch(e){}if(document.images)new Image().src='/images/nav_logo117.png'" dir="ltr" alink="#dd4b39" ...
var _coarr = eval('(' + _co + ')');google.j[1]={cc:[],co:_coarr,bl:['mngb','gb_'],funcs:[
{'n':'pcs','i':'gstyle','css':document.getElementById('gstyle').innerHTML,'is':'','r':true,'sc':true},{'n':'pc','i':'cst','h':document.getElementById('cst').innerHTML,'is':'','r':true,'sc':true},{'n':'pc','i':'main','h':_mstr,'is':'','r':true,'sc':tr...
};})();</script><script data-url="/extern_chrome/1cfbda40ed967628.js?bav=or.r_qf" id="ecs">function wgjp(){var xjs=document.createElement('script');xjs.src=document.getElementById('ecs').getAttribute('data-url');(document.getElementById('xjsd')|| doc...
if(!google.xjs){google.dstr=[];google.rein=[];window._=window._||{};window._._DumpException=function(e){throw e};if(google.timers&&google.timers.load.t){google.timers.load.t.xjsls=new Date().getTime();}google.dljp('/xjs/_/js/s/c,sb,cr,cdos,vm,tbui,mb...
function n(b,f,m){m=b.offsetHeight?m-b.offsetHeight:m;f-=m;f=Math.max(f,0);b.style.height=f+"px";return f}
Finance-Bank-IE
view release on metacpan or search on metacpan
data/BankOfIreland/moneyTransfer_execution=e7s3 view on Meta::CPAN
<meta http-equiv="refresh" content="615; URL=/online365/spring/logout" />
<!-- IE9 / RichFaces 3 Fix -->
<meta http-equiv="X-UA-Compatible" content="IE=EmulateIE8" />
<link class="component" href="/online365/spring/resource/org/richfaces/renderkit/html/css/basic_classes.xcss/DATB/eAELXT5DOhSIAQ!sA18_" rel="stylesheet" type="text/css" /><link class="component" href="/online365/spring/resource/org/richfa...
<link rel="SHORTCUT ICON" href="/online365/favicon.ico" />
<link rel="stylesheet" type="text/css" href="/online365/css/boi_online.css" />
<link rel="stylesheet" type="text/css" href="/online365/css/date_picker.css" />
<link rel="stylesheet" type="text/css" href="/online365/css/tabs.css" />
data/BankOfIreland/moneyTransfer_execution=e7s3 view on Meta::CPAN
<span class="pad_txt"></span><input id="form:paymentProcessRadio:1" type="radio" name="form:paymentProcessRadio" value="PAY_LATER" size="18" onclick="document.getElementById('form:ajaxRequestStatus')....
<ez:busystatus id="busy" for="form:paymentProcessRadio"></ez:busystatus>
</div>
</div><span id="form:renderScheduledDate">
<div class="single_line_div date_div">
<label for="form:calendarScheduledDateInputDate" class="show_label long_label"><span class="hidden_label">Date of future payment dd/mm/yyyy</span></label>
<span class="pad_txt2"></span><span id="form:calendarScheduledDatePopup"><input class="rich-calendar-input inputbox input_medium" disabled="true" id="form:calendarScheduledDateInputDate" maxlength="10" name="form:cal...
new Calendar('form:calendarScheduledDate',
"en_GB",{'showWeeksBar':false,'showFooter':false,'currentDate':new Date(2012,3,12),'datePattern':'dd/MM/yyyy','enableManualInput':true,'firstWeekDay':1,'disabled':true,'weekDayLabelsShort':['S','M','T','W','T','F','S'] } , {
dayListMarkup:[new ET(function (context) { return Richfaces.evalMacro("day", context)})
],
weekDayMarkup: [new ET(function (context) { return Richfaces.evalMacro("weekDayLabelShort", context)})
],
Finance-Bank-Wachovia
view release on metacpan or search on metacpan
data/bank_transactions.html view on Meta::CPAN
<script type="text/JavaScript" src=/onlinebanking/javascript/overlib.js></script>
<script type="text/JavaScript" src=/onlinebanking/javascript/TableDataSort.js></script>
<script type="text/JavaScript" src=/onlinebanking/javascript/screenTableHelper.js></script>
<script type="text/JavaScript" src=/onlinebanking/javascript/viewchkHelper.js></script>
<script type="text/JavaScript" src=/onlinebanking/javascript/screenNavigation.js>
<script type="text/JavaScript" src=/onlinebanking/javascript/calendar.js></script>
<script type="text/JavaScript" src=/onlinebanking/javascript/printableUtil.js></script>
<LINK rel=stylesheet type="text/css" href="/onlinebanking/javascript/screenNav.css">
<script language=javascript type="text/javascript">
<!-- hide script from old browsers
data/bank_transactions.html view on Meta::CPAN
<!-- start date range table -->
<TABLE BORDER="0" CELLPADDING="0" CELLSPACING="2" WIDTH="630">
<TR ALIGN="LEFT" VALIGN="TOP">
<TD><IMG SRC="/onlinebanking/c2images/clear.gif" WIDTH="1" HEIGHT="5"><BR><FONT FACE="arial,helvetica,geneva" size="2" COLOR="#000000"><B>Date Range: </B></FONT><INPUT TYPE="TEXT" id=fromDateRange name=fromDateRange size="10" maxlen...
</TR>
<TR ALIGN="LEFT" VALIGN="TOP">
<TD><FONT FACE="arial, helvetica, geneva" SIZE="-1">
Transactions available from 09/16/2004 to today.
<BR>
Finance-Calendar
view release on metacpan or search on metacpan
lib/Finance/Calendar.pm view on Meta::CPAN
package Finance::Calendar;
=head1 NAME
Finance::Calendar - represents the trading calendar.
=head1 SYNOPSIS
use Finance::Calendar;
use Date::Utility;
my $calendar = {
holidays => {
"25-Dec-2013" => {
"Christmas Day" => [qw(FOREX METAL)],
},
"1-Jan-2014" => {
lib/Finance/Calendar.pm view on Meta::CPAN
'24-Dec-2010' => {
'14:30' => ['HKSE'],
},
},
};
my $calendar = Finance::Calendar->new(calendar => $calendar);
my $now = Date::Utility->new;
# Does London Stocks Exchange trade on $now
$calendar->trades_on(Finance::Exchange->create_exchange('LSE'), $now);
# Is it a country holiday for the United States on $now
$calendar->is_holiday_for('USD', $now);
# Returns the opening time of Australian Stocks Exchange on $now
$calendar->opening_on(Finance::Exchange->create_exchange('ASX'), $now);
# Returns the closing time of Forex on $now
$calendar->closing_on(Finance::Exchange->create_exchange('FOREX'), $now);
...
=head1 DESCRIPTION
This class is responsible for providing trading times or holidays related information of a given financial stock exchange on a specific date.
lib/Finance/Calendar.pm view on Meta::CPAN
use Finance::Exchange;
use Carp qw(croak);
=head1 ATTRIBUTES - Object Construction
=head2 calendar
A hash reference that has information on:
- exchange and country holidays
- late opens
- early closes
=cut
has calendar => (
is => 'ro',
required => 1,
);
has _cache => (
lib/Finance/Calendar.pm view on Meta::CPAN
return $next_day if ($open_ti and $next_day->epoch + $open_ti->seconds <= $date->epoch);
return $date->truncate_to_day;
}
=head2 calendar_days_to_trade_date_after
->calendar_days_to_trade_date_after($exchange_object, $date_object);
Returns the number of calendar days between a given Date::Utility
and the next day on which trading is open.
=cut
sub calendar_days_to_trade_date_after {
my ($self, $exchange, $when) = @_;
if (my $cache = $self->_get_cache('calendar_days_to_trade_date_after', $exchange, $when)) {
return $cache;
}
my $number_of_days = $self->trade_date_after($exchange, $when)->days_between($when);
$self->_set_cache($number_of_days, 'calendar_days_to_trade_date_after', $exchange, $when);
return $number_of_days;
}
=head2 trading_days_between
lib/Finance/Calendar.pm view on Meta::CPAN
=back
Examples:
# Friday closing adjustment for FOREX
my $changes = $calendar->regularly_adjusts_trading_hours_on(
Finance::Exchange->create_exchange('FOREX'),
Date::Utility->new('2023-02-17') # Friday
);
# Returns a hashref with adjusted closing time on Fridays:
# {
lib/Finance/Calendar.pm view on Meta::CPAN
# 'rule' => 'Fridays'
# }
# }
# Sunday opening adjustment for RSI exchanges
my $changes = $calendar->regularly_adjusts_trading_hours_on(
Finance::Exchange->create_exchange('TACTICAL_FOREX_EURUSD'),
Date::Utility->new('2023-02-12') # Sunday
);
# Returns a hashref with adjusted opening time on Sundays:
# {
lib/Finance/Calendar.pm view on Meta::CPAN
sub _get_holidays_for {
my ($self, $symbol, $when) = @_;
my $date = $when->truncate_to_day->epoch;
my $calendar = $self->calendar->{holidays};
my $holiday = $calendar->{$date};
return undef unless $holiday;
foreach my $holiday_desc (keys %$holiday) {
return $holiday_desc if (first { $symbol eq $_ } @{$holiday->{$holiday_desc}});
lib/Finance/Calendar.pm view on Meta::CPAN
# get partial trading data for a given exchange
sub _get_partial_trading_for {
my ($self, $exchange, $type, $when) = @_;
my $cached = $self->calendar->{$type};
my $date = $when->truncate_to_day->epoch;
my $partial_defined = $cached->{$date};
return undef unless $partial_defined;
lib/Finance/Calendar.pm view on Meta::CPAN
sub _market_opens {
my ($self, $exchange, $when) = @_;
my $date = $when;
# Figure out which "trading day" we are on
# even if it differs from the GMT calendar day.
my $next_day = $date->plus_time_interval('1d')->truncate_to_day;
my $next_open = $self->opening_on($exchange, $next_day);
$date = $next_day if ($next_open and not $date->is_before($next_open));
my $open = $self->opening_on($exchange, $date);
Finance-CompanyNames
view release on metacpan or search on metacpan
CompanyNames/TextSupport.pm view on Meta::CPAN
calcite calcites calcitic
calcitonin calcitonins
calcualted calcualtes
calculable calculate calculated calculates calculati calculating calculation calculational calculations calculative calculatively calculator calculators
caldera calderas
calendar calendaring calendars
calender calendered calendering calenders
caliber calibers
calibrant calibratable calibrate calibrated calibrates calibrating calibration calibrations calibrator calibrators
calico calicos
caliper calipers
CompanyNames/TextSupport.pm view on Meta::CPAN
calculator
calculators
calculi
calculus
caldera
calendar
calendars
calf
calfskin
caliber
calibers
calibrate
Finance-Currency-Convert-BI
view release on metacpan or search on metacpan
t/data/jisdor-2022-02-25.html view on Meta::CPAN
<div class="col-sm-12 col-md-3 col-lg-3">
<div class="sidebar__list input-daterange-bulanan">
<label class="label-custom mb-1">
Dari</label>
<div class="input-wrapper mb-3" style="margin-top: 10px">
<input name="ctl00$ctl44$g_f51e6b6d_47c5_4ff4_8105_27cbd1a2f52d$ctl00$TextBoxFrom" type="text" id="TextBoxFrom" class="form-control mr-sm-2 text-left" autocomplete="off" onkeydown="return false" placeholder="dd/mm/yyyy" /><i c...
<input type="hidden" name="ctl00$ctl44$g_f51e6b6d_47c5_4ff4_8105_27cbd1a2f52d$ctl00$HiddenFieldDateFrom" id="HiddenFieldDateFrom" />
</div>
</div>
</div>
<div class="col-sm-12 col-md-3 col-lg-3">
<div class="sidebar__list input-daterange-bulanan">
<label class="label-custom mb-1">
Sampai</label>
<div class="input-wrapper mb-3" style="margin-top: 10px">
<input name="ctl00$ctl44$g_f51e6b6d_47c5_4ff4_8105_27cbd1a2f52d$ctl00$TextBoxDateTo" type="text" id="TextBoxDateTo" class="form-control mr-sm-2 text-left" autocomplete="off" onkeydown="return false" placeholder="dd/mm/yyyy" />...
<input type="hidden" name="ctl00$ctl44$g_f51e6b6d_47c5_4ff4_8105_27cbd1a2f52d$ctl00$HiddenFieldDateTo" id="HiddenFieldDateTo" />
</div>
</div>
</div>
<div class="col-sm-12 col-md-3 col-lg-3">
Finance-Instrument
view release on metacpan or search on metacpan
lib/Finance/Instrument/Futures.pm view on Meta::CPAN
has underlying => (is => "rw", isa => "Maybe[Finance::Instrument]");
has last_trading_day_close => (is => "rw", isa => "Int");
has month_cycle => (is => "rw", isa => "Str");
has active_months => (is => "rw", isa => "Int");
has contract_calendar => (is => "rw", isa => "HashRef", default => sub { {} });
my $month_code = [qw(F G H J K M N Q U V X Z)];
sub encode {
my $self = shift;
lib/Finance/Instrument/Futures.pm view on Meta::CPAN
return $month_code->[$self->month-1].substr($self->year, -1 * $year_digit, $year_digit);
}
method near_term_contract($datetime) {
my $date = ref($datetime) ? $datetime->ymd : $datetime;
my @contracts = reverse sort keys %{$self->contract_calendar};
for my $c_i (0..$#contracts-1) {
my ($curr, $prev) = map { $self->contract_calendar->{$contracts[$_]} } ($c_i, $c_i + 1);
if ($date le $curr->{last_trading_day} && $date gt $prev->{last_trading_day}) {
return $self->contract($contracts[$c_i]);
}
}
}
lib/Finance/Instrument/Futures.pm view on Meta::CPAN
unless ($month) {
($year, $month) = $year =~ m/(\d\d\d\d)(\d\d)/
or Carp::croak "invalid expiry format";
}
my $expiry = sprintf("%04d%02d", $year, $month);
my $curr = $self->contract_calendar->{$expiry} || {};
my $fc = $self->domain->get($self->code.'_'.$expiry)
|| Finance::Instrument::FuturesContract->new( futures => $self,
expiry_year => int($year),
expiry_month => int($month),
domain => $self->domain,
Finance-PaycheckRecords-Fetcher
view release on metacpan or search on metacpan
example/Paycheck-2013-01-04.html view on Meta::CPAN
<link rel="stylesheet" href="/style/container.css" type="text/css">
<link rel="stylesheet" href="/style/calendar.css" type="text/css">
<link rel="stylesheet" href="/style/button.css" type="text/css">
<link rel="stylesheet" href="/style/qbosso.css" type="text/css" />
example/Paycheck-2013-01-04.html view on Meta::CPAN
<script type="text/javascript" language="JavaScript" src="/util/input_validators.js"></script>
<script language="JavaScript" src="/util/apphelper.js"></script>
<script language="JavaScript" src="/util/calendar.js"></script>
<script language="JavaScript" src="/util/numbers.js"></script>
</HEAD>
<BODY>
Finance-PaycheckRecords
view release on metacpan or search on metacpan
example/Paycheck-2013-01-04.html view on Meta::CPAN
<link rel="stylesheet" href="/style/container.css" type="text/css">
<link rel="stylesheet" href="/style/calendar.css" type="text/css">
<link rel="stylesheet" href="/style/button.css" type="text/css">
<link rel="stylesheet" href="/style/qbosso.css" type="text/css" />
example/Paycheck-2013-01-04.html view on Meta::CPAN
<script type="text/javascript" language="JavaScript" src="/util/input_validators.js"></script>
<script language="JavaScript" src="/util/apphelper.js"></script>
<script language="JavaScript" src="/util/calendar.js"></script>
<script language="JavaScript" src="/util/numbers.js"></script>
</HEAD>
<BODY>
Finance-Quote-Grab
view release on metacpan or search on metacpan
lib/Finance/Quote/Ghana.pm view on Meta::CPAN
_errormsg ($quotes, $symbol_list, $resp->status_line);
return;
}
my $content = $resp->decoded_content (raise_error => 1, charset => 'none');
# Eg. <span class="glyphicon glyphicon-calendar"></span> February 22, 2019</div>
$content =~ m{glyphicon-calendar.*?([a-z]+) (\d{1,2}), (\d\d\d\d)}i
or die "GSE: daily page cannot find trade date\n";
my $date = "$1/$2/$3"; # "October/03/2014"
require HTML::TableExtract;
my $te = HTML::TableExtract->new
Finance-TW-TAIFEX
view release on metacpan or search on metacpan
lib/Finance/TW/TAIFEX.pm view on Meta::CPAN
has context_date => ( is => "rw", isa => "DateTime",
default => sub { DateTime->now(time_zone => 'Asia/Taipei') },
coerce => 1);
has calendar => (is => "ro", isa => "HashRef", default => sub { {} });
has products => (
traits => ['Hash'],
is => "ro",
isa => "HashRef[Finance::TW::TAIFEX::Product]",
lib/Finance/TW/TAIFEX.pm view on Meta::CPAN
my ($self, $file) = @_;
open my $fh, '<', $file or die "$file: $!" ;
return [map { chomp; $_ } <$fh>];
}
=head2 calendar_for YEAR
Returns the trading calendar for YEAR.
=cut
sub calendar_for {
my ($self, $year) = @_;
$year ||= $self->context_date->year;
return $self->calendar->{$year}
if $self->calendar->{$year};
my $dist_dir = File::Spec->rel2abs("../../../share", File::Basename::dirname($INC{"Finance/TW/TAIFEX.pm"}));
$dist_dir = try { dist_dir('Finance-TW-TAIFEX') || 'share' } unless -e $dist_dir;
$self->calendar->{$year} = $self->_read_cal("$dist_dir/calendar/$year.txt");
}
=head2 is_trading_day [DATE]
Checks if the given DATE is a known trading day. Default DATE is the date in the current context.
lib/Finance/TW/TAIFEX.pm view on Meta::CPAN
sub is_trading_day {
my ($self, $date) = @_;
$date ||= $self->context_date;
$self->_nth_trading_day($self->calendar_for($date->year), $date->ymd) != -1;
}
=head2 next_trading_day [DATE]
Returns the next known trading day in string after the given DATE.
lib/Finance/TW/TAIFEX.pm view on Meta::CPAN
sub next_trading_day {
my ($self, $date) = @_;
$date ||= $self->context_date;
my $cal = $self->calendar_for($date->year);
my $d = $date->ymd;
my $nth = firstidx { $_ gt $d } @{$cal};
if ($nth < 0) {
return $self->calendar_for($date->year + 1)->[0];
}
return $cal->[$nth];
}
lib/Finance/TW/TAIFEX.pm view on Meta::CPAN
sub previous_trading_day {
my ($self, $date, $offset) = @_;
$date ||= $self->context_date;
$offset ||= -1;
my $cal = $self->calendar_for($date->year);
my $nth = $self->_nth_trading_day($cal, $date->ymd);
die "$date not a known trading day"
if $nth < 0;
if ($nth + $offset < 0) {
return $self->calendar_for($date->year - 1)->[-1];
}
return $cal->[$nth + $offset];
}
Flower
view release on metacpan or search on metacpan
public/assets/css/ionicons.min.css view on Meta::CPAN
Android-style icons originally built by Google’s
Material Design Icons: https://github.com/google/material-design-icons
used under CC BY http://creativecommons.org/licenses/by/4.0/
Modified icons to fit ionicon’s grid from original.
*/@font-face{font-family:"Ionicons";src:url("../fonts/ionicons.eot?v=2.0.0");src:url("../fonts/ionicons.eot?v=2.0.0#iefix") format("embedded-opentype"),url("../fonts/ionicons.ttf?v=2.0.0") format("truetype"),url("../fonts/ionicons.woff?v=2.0.0") form...
Footprintless
view release on metacpan or search on metacpan
t/data/base/conf/web.xml view on Meta::CPAN
<extension>ico</extension>
<mime-type>image/x-icon</mime-type>
</mime-mapping>
<mime-mapping>
<extension>ics</extension>
<mime-type>text/calendar</mime-type>
</mime-mapping>
<mime-mapping>
<extension>ief</extension>
<mime-type>image/ief</mime-type>
</mime-mapping>
<mime-mapping>
<extension>ifb</extension>
<mime-type>text/calendar</mime-type>
</mime-mapping>
<mime-mapping>
<extension>ifm</extension>
<mime-type>application/vnd.shana.informed.formdata</mime-type>
</mime-mapping>
t/data/base/conf/web.xml view on Meta::CPAN
<extension>sub</extension>
<mime-type>image/vnd.dvb.subtitle</mime-type>
</mime-mapping>
<mime-mapping>
<extension>sus</extension>
<mime-type>application/vnd.sus-calendar</mime-type>
</mime-mapping>
<mime-mapping>
<extension>susp</extension>
<mime-type>application/vnd.sus-calendar</mime-type>
</mime-mapping>
<mime-mapping>
<extension>sv4cpio</extension>
<mime-type>application/x-sv4cpio</mime-type>
</mime-mapping>
t/data/base/conf/web.xml view on Meta::CPAN
<extension>vcg</extension>
<mime-type>application/vnd.groove-vcard</mime-type>
</mime-mapping>
<mime-mapping>
<extension>vcs</extension>
<mime-type>text/x-vcalendar</mime-type>
</mime-mapping>
<mime-mapping>
<extension>vcx</extension>
<mime-type>application/vnd.vcx</mime-type>
</mime-mapping>
Form-Processor
view release on metacpan or search on metacpan
lib/Form/Processor/Field/DateTimeManip.pm view on Meta::CPAN
return unless my $value = $self->value;
die "Value is not a DateTime" unless $value->isa( 'DateTime' );
my $d = $value->strftime( '%a, %b %e %Y %l:%M %p %Z' );
# The calendar javascript popup can't parse the day & hour with a leading space,
# so remove.
$d =~ s/\s(\s\d:)/$1/;
$d =~ s/\s(\s\d\s\d{4})/$1/;
FreeHAL
view release on metacpan or search on metacpan
lang_en/conceptnet-commonsense-is-1.pro view on Meta::CPAN
is <> a pillowcase <> nothing <> a cover;for a pillow <> <> <> nothing <> <> <> <> 50
harp is <> a <> a musical instrument <> <> <> <> nothing <> <> <> <> 50
is <> a space <> a area <> <> <> <> nothing <> <> <> <> 50
is <> a linen <> a cloth <> <> <> <> nothing <> <> <> <> 50
called is <> cargo <> freight <> <> <> <> nothing <> <> <> <> 50
is <> a calendar <> a graph <> of the days in a year <> <> <> nothing <> <> <> <> 50
is <> a athame <> nothing <> a;double-edged dagger <> <> <> nothing <> <> <> <> 50
is <> balefire <> a fire <> <> <> <> nothing <> <> <> <> 50
is <> a censer <> a insense <> burner <> <> <> nothing <> <> <> <> 50
is <> a chalise <> a ritual goblet <> <> <> <> nothing <> <> <> <> 50
is <> a grimoire <> a magickal workbook <> <> <> <> nothing <> <> <> <> 50
Frontier-RPC
view release on metacpan or search on metacpan
examples/validator1-daemon.pl view on Meta::CPAN
my $array = shift;
return join('', $array->[0], $array->[-1]);
}
sub nestedStructTest {
my $calendar = shift;
my $april_1_2000 = $calendar->{'2000'}{'04'}{'01'};
return ($april_1_2000->{'moe'} + $april_1_2000->{'larry'}
+ $april_1_2000->{'curly'});
}
sub simpleStructReturnTest {
Future
view release on metacpan or search on metacpan
lib/Future.pm view on Meta::CPAN
L<https://docs.google.com/presentation/d/1UkV5oLcTOOXBXPh8foyxko4PR28_zU_aVx6gBms7uoo/edit>
=item *
"Futures advent calendar 2013"
L<http://leonerds-code.blogspot.co.uk/2013/12/futures-advent-day-1.html>
=item *
GBK
view release on metacpan or search on metacpan
| UTF-8 | Latin-1 | |
+----------+-----------+---------------------+
| UTF8 | Not UTF8 |
| Flagged | Flagged |
+--------------------------------------------+
http://perl-users.jp/articles/advent-calendar/2010/casual/4
Confusion of Perl string model is made from double meanings of
"Binary string."
Meanings of "Binary string"
1. Non-Text string
GBPVR-CDBI
view release on metacpan or search on metacpan
contrib/pending2ical.pl view on Meta::CPAN
use GBPVR::CDBI::RecordingSchedule;
use Data::ICal;
use Data::ICal::Entry::Event;
my $calendar = Data::ICal->new();
my @rows = GBPVR::CDBI::RecordingSchedule->search( status => 0 );
foreach my $row (@rows){
my $start = sprintf "%04d%02d%02dT%02d%02d%02d", $row->parse_manual_time($row->manual_start_time); # YYYYMMDDTHHMMSS
my $end = sprintf "%04d%02d%02dT%02d%02d%02d", $row->parse_manual_time($row->manual_end_time); # YYYYMMDDTHHMMSS
contrib/pending2ical.pl view on Meta::CPAN
dtstart => $start,
dtend => $end,
location => $channel->channel_number . ' - ' . $channel->name,
status => 'CONFIRMED',
);
$calendar->add_entry($vevent);
}
@rows = GBPVR::CDBI::RecordingSchedule->search( status => 4 );
foreach my $row (@rows){
my $start = sprintf "%04d%02d%02dT%02d%02d%02d", $row->parse_manual_time($row->manual_start_time); # YYYYMMDDTHHMMSS
contrib/pending2ical.pl view on Meta::CPAN
dtend => $end,
location => $channel->channel_number . ' - ' . $channel->name,
status => 'TENTATIVE',
rrule => 'FREQ=WEEKLY;INTERVAL=1',
);
$calendar->add_entry($vevent);
}
print $calendar->as_string;;
#eof#
GSM-Gnokii
view release on metacpan or search on metacpan
lib/GSM/Gnokii.pm view on Meta::CPAN
Set and enable alarm. Hour should be between 0 and 23, Minute between
0 and 59.
=head2 GetCalendarNotes (start, end)
Returns a reference to a list of calendar note hashes, like:
location => 1,
date => "2011-11-11 11:11:11",
type => "Meeting",
text => "Be there or be fired",
lib/GSM/Gnokii.pm view on Meta::CPAN
recurrence => "Weekly",
number => "+31612345678",
=head2 WriteCalendarNote ({ ... })
Set a calendar note, attributes marked with a * are required
date => time + 86400, # * Date and time of note
text => "Call John!", # * Note text
type => "call", # Note type, defaults to MEMO
number => "+31612345678", # Required for type CALL
Galileo
view release on metacpan or search on metacpan
lib/Galileo/files/public/assets/bootstrap/css/bootstrap.min.css view on Meta::CPAN
* Copyright 2012 Twitter, Inc
* Licensed under the Apache License v2.0
* http://www.apache.org/licenses/LICENSE-2.0
*
* Designed and built with all the love in the world @twitter by @mdo and @fat.
*/article,aside,details,figcaption,figure,footer,header,hgroup,nav,section{display:block}audio,canvas,video{display:inline-block;*display:inline;*zoom:1}audio:not([controls]){display:none}html{font-size:100%;-webkit-text-size-adjust:100%;-ms-text-si...
( run in 1.246 second using v1.01-cache-2.11-cpan-39bf76dae61 )