view release on metacpan or  search on metacpan

lib/App/MonM/Util.pm  view on Meta::CPAN

sub new {
    my $class = shift;
    my %args = @_;

    my $self = bless {
            calendar => {}, # { channel_name => [ { weekday_index => [start, finish] } ] }
            added    => {}, # { channel_name => at }
        }, $class;

    return $self;
}

lib/App/MonM/Util.pm  view on Meta::CPAN

    # Split by days & times
    my @wdt_blocks = ();
    while ($at =~ /([a-z\-]{3,18}(\[([0-9\-:,;]+|none|no|off)\])?)/ig) {
        push @wdt_blocks, _parse_wdt($1);
    }
    $self->{calendar}{$chname} = [@wdt_blocks];

    return $self;
}
sub check {
    my $self = shift;
    my $chname = shift || "default";
    my $test = shift || time();

    # Exists
    return 1 unless exists $self->{calendar}{$chname}; # No calendar - no limits
    my $calendar = array($self->{calendar}, $chname);
    return 0 if is_void($calendar); # No allow intervals in the calendar - denied

    # Get test values
    my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($test);
    my $t = $hour*60*60 + $min*60 + $sec;

    # Check
    my $allow = 0; # denied by default
    foreach my $int (@$calendar) {
        next unless is_hash($int);
        my $sec = $int->{$wday};
        next unless $sec && is_array($sec);
        my ($s, $f) = (($sec->[0] || 0), ($sec->[1] || 0));
        next unless $s+$f;

 view release on metacpan or  search on metacpan

public/javascripts/ace/mode-drools.js  view on Meta::CPAN

var packageIdentifierRe = "[a-zA-Z\\$_\u00a1-\uffff][\\.a-zA-Z\\d\\$_\u00a1-\uffff]*";

var DroolsHighlightRules = function() {

    var keywords = ("date|effective|expires|lock|on|active|no|loop|auto|focus" +
        "|activation|group|agenda|ruleflow|duration|timer|calendars|refract|direct" +
        "|dialect|salience|enabled|attributes|extends|template" +
        "|function|contains|matches|eval|excludes|soundslike" +
        "|memberof|not|in|or|and|exists|forall|over|from|entry|point|accumulate|acc|collect" +
        "|action|reverse|result|end|init|instanceof|extends|super|boolean|char|byte|short" +
        "|int|long|float|double|this|void|class|new|case|final|if|else|for|while|do" +

 view release on metacpan or  search on metacpan

share/public/css/bootstrap.min.css  view on Meta::CPAN

.icon-fire{background-position:-72px -120px;}
.icon-eye-open{background-position:-96px -120px;}
.icon-eye-close{background-position:-120px -120px;}
.icon-warning-sign{background-position:-144px -120px;}
.icon-plane{background-position:-168px -120px;}
.icon-calendar{background-position:-192px -120px;}
.icon-random{background-position:-216px -120px;width:16px;}
.icon-comment{background-position:-240px -120px;}
.icon-magnet{background-position:-264px -120px;}
.icon-chevron-up{background-position:-288px -120px;}
.icon-chevron-down{background-position:-313px -119px;}

 view release on metacpan or  search on metacpan

share/mib/FOUNDRY-SN-AGENT-MIB.mib  view on Meta::CPAN

	SYNTAX	DisplayString
	MAX-ACCESS	read-only
	STATUS	current
	DESCRIPTION
		"A time stamp when the event is logged. This object returns
		a NULL terminated time stamp string if the system calendar
		time was set. It returns a zero length string if the system
		calendar time was not set."
	::= { snAgSysLogBufferEntry 5 }


-- Static System Logging Buffer Table

share/mib/FOUNDRY-SN-AGENT-MIB.mib  view on Meta::CPAN

	SYNTAX	DisplayString
	MAX-ACCESS	read-only
	STATUS	current
	DESCRIPTION
		"A time stamp when the event is logged. This object returns
		a NULL terminated time stamp string if the system calendar
		time was set. It returns a zero length string if the system
		calendar time was not set."
	::= { snAgStaticSysLogBufferEntry 5 }

-- SysLog Server Table

snAgSysLogServerTable OBJECT-TYPE

 view release on metacpan or  search on metacpan

lib/App/Office/Contacts/Donations/Controller/Initialize.pm  view on Meta::CPAN

var add_organization_tab;
var organization_donations_tab;
var organization_tab;
var organization_notes_tab;

var from_calendar;
var to_calendar;

var report_tab;

EJS

 view release on metacpan or  search on metacpan

Changelog.ini  view on Meta::CPAN

[V 1.03]
Date=2010-02-05T17:27:00
Comments= <<EOT
- Remove personal use lib from CGI scripts.
- Use smarter check for calendar div in Contacts.build_head_init,
so cursor appears in search name box upon startup.
EOT

[V 1.02]
Date=2010-01-29T09:52:00

 view release on metacpan or  search on metacpan

lib/App/PLab/ButtonGlyphs.pm  view on Meta::CPAN

use constant bookshut     => 21;
use constant brush        => 22;
use constant bulboff      => 23;
use constant bulbon       => 24;
use constant calculat     => 25;
use constant calendar     => 26;
use constant cdrom        => 27;
use constant check        => 28;
use constant clear        => 29;
use constant clock        => 30;
use constant compmac      => 31;

 view release on metacpan or  search on metacpan

lib/App/PM/Announce.pm  view on Meta::CPAN

# Replace <venue> with the venue number you want to be the default

#<feed meetup>
#    username
#    password
#    uri http://www.meetup.com/An-Example-Group/calendar/?action=new
#    venue <venue>
#</feed>

# Replace <gid> with the gid of your group

 view release on metacpan or  search on metacpan

t/files/moby11.txt  view on Meta::CPAN

driven in one eccentric span.  But while hapless Dough-Boy was by nature

dull and torpid in his intellects, Pip, though over tender-hearted,

was at bottom very bright, with that pleasant, genial, jolly brightness

peculiar to his tribe; a tribe, which ever enjoy all holidays

and festivities with finer, freer relish than any other race.

For blacks, the year's calendar should show naught but three hundred

and sixty-five Fourth of Julys and New Year's Days.  Nor smile so,

while I write that this little black was brilliant, for even blackness has

its brilliancy; behold yon lustrous ebony, panelled in king's cabinets.

But Pip loved life, and all life's peaceable securities; so that

the panic-striking business in which he had somehow unaccountably

t/files/moby11.txt  view on Meta::CPAN

By Golconda! let me read it once.  Halloa! here's signs and

wonders truly!  That, now, is what old Bowditch in his Epitome

calls the zodiac, and what my almanack below calls ditto.

I'll get the almanack; and as I have heard devils can be raised

with Daboll's arithmetic, I'll try my hand at raising a meaning

out of these queer curvicues here with the Massachusetts calendar.

Here's the book.  Let's see now.  Signs and wonders;

and the sun, he's always among 'em.  Hem, hem, hem; here they are--

here they go--all alive:  Aries, or the Ram; Taurus, or the Bull

and Jimimi! here's Gemini himself, or the Twins.  Well; the sun

he wheels among 'em.  Aye, here on the coin he's just crossing

the threshold between two of twelve sitting-rooms all in a ring.

Book! you lie there; the fact is, you books must know your places.

You'll do to give us the bare words and facts, but we come

in to supply the thoughts.  That's my small experience,

so far as the Massachusetts calendar, and Bowditch's navigator,

and Daboll's arithmetic go.  Signs and wonders, eh?  Pity if there

is nothing wonderful in signs, and significant in wonders!

There's a clue somewhere; wait a bit; hist--hark!  By Jove, I have it!

Look you, Doubloon, your zodiac here is the life of man in one

round chapter; and now I'll read it off, straight out of the book.

 view release on metacpan or  search on metacpan

lib/App/SpreadRevolutionaryDate.pm  view on Meta::CPAN

Initialises the internal C<App::SpreadRevolutionaryDate> object. This is where all targets objets are built, and authentication is attempted on each of them.

=head2 spread

Spreads calendar date to configured targets. Takes no argument.

=head1 SEE ALSO

=over

 view release on metacpan or  search on metacpan

share/res/css/bootstrap.css  view on Meta::CPAN

.icon-plane {
  background-position: -168px -120px;
}

.icon-calendar {
  background-position: -192px -120px;
}

.icon-random {
  width: 16px;

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

CHANGES
htdocs/images/DualListSelect/dnarrow.gif
htdocs/images/DualListSelect/lfarrow.gif
htdocs/images/DualListSelect/rtarrow.gif
htdocs/images/DualListSelect/uparrow.gif
htdocs/images/IconPaneSelector/calendar.gif
htdocs/images/IconPaneSelector/calendar_sm.gif
htdocs/images/IconPaneSelector/contacts.gif
htdocs/images/IconPaneSelector/contacts_sm.gif
htdocs/images/IconPaneSelector/drafts_sm.gif
htdocs/images/IconPaneSelector/home.gif
htdocs/images/IconPaneSelector/inbox_sm.gif

 view release on metacpan or  search on metacpan

lib/App/cal/idn.pm  view on Meta::CPAN

our %SPEC;

$SPEC{':package'} = {
    v => 1.1,
    summary => 'Display Indonesian calendar on the command-line',
};

sub _center {
    my ($w, $text) = @_;
    my $tw = length($text);

lib/App/cal/idn.pm  view on Meta::CPAN

sub _rpad {
    my ($w, $text) = @_;
    sprintf("%s%s", $text, " " x ($w-ta_length($text)));
}

$SPEC{gen_monthly_calendar} = {
    v => 1.1,
    summary => 'Generate a single month calendar',
    description => <<'_',

Return [\@lines, \@hol]

_

lib/App/cal/idn.pm  view on Meta::CPAN

        },
    },
    "x.perinci.sub.wrapper.disable_validate_args" => 1,
    result_naked => 1,
};
sub gen_monthly_calendar {
    my %args = @_;
    my $m = $args{month};
    my $y = $args{year};

    my @lines;

lib/App/cal/idn.pm  view on Meta::CPAN

    }

    return [\@lines, $hol];
}

$SPEC{gen_calendar} = {
    v => 1.1,
    summary => 'Generate one or more monthly calendars in 3-column format',
    args => {
        months => {
            schema => ['int*', min=>1, max=>12, default=>1],
        },
        year => {

lib/App/cal/idn.pm  view on Meta::CPAN

            schema => 'str*',
        },
    },
    "x.perinci.sub.wrapper.disable_validate_args" => 1,
};
sub gen_calendar {
    my %args = @_;
    my $y  = $args{year};
    my $m  = $args{month};
    my $mm = $args{months} // 1;
    my $tz = $args{time_zone} // $ENV{TZ} // "UTC";

lib/App/cal/idn.pm  view on Meta::CPAN

    }

    my @moncals;
    my $dt = DateTime->new(year=>$y, month=>$m, day=>1, time_zone=>$tz);
    for (1..$mm) {
        push @moncals, gen_monthly_calendar(
            month=>$dt->month, year=>$dt->year, time_zone=>$tz, %margs);
        $dt->add(months => 1);
    }
    my @hol = map {@{ $_->[1] }} @moncals;
    my $l = max(map {scalar @$_} map {$_->[0]} @moncals);

lib/App/cal/idn.pm  view on Meta::CPAN

    [200, "OK", join("\n", @lines)];
}

1;
# ABSTRACT: Display Indonesian calendar on the command-line

__END__

=pod

=encoding UTF-8

=head1 NAME

App::cal::idn - Display Indonesian calendar on the command-line

=head1 VERSION

This document describes version 0.137 of App::cal::idn (from Perl distribution App-cal-idn), released on 2023-07-11.

lib/App/cal/idn.pm  view on Meta::CPAN

 # See cal-idn script provided in this distribution

=head1 DESCRIPTION

This module provides the L<cal-idn> command to display Indonesian calendar on
the command-line.

=head1 FUNCTIONS


=head2 gen_calendar

Usage:

 gen_calendar(%args) -> [$status_code, $reason, $payload, \%result_meta]

Generate one or more monthly calendars in 3-column format.

This function is not exported.

Arguments ('*' denotes required arguments):

lib/App/cal/idn.pm  view on Meta::CPAN

Return value:  (any)



=head2 gen_monthly_calendar

Usage:

 gen_monthly_calendar(%args) -> any

Generate a single month calendar.

Return [\@lines, \@hol]

This function is not exported.

 view release on metacpan or  search on metacpan

lib/App/calendr.pm  view on Meta::CPAN

You can list all command line options by giving C<--help> flag.The C<--name> flag
is only  mandatory. Rest of all are  optionals. If C<--month> flag is passed then
the C<--year> flag  becomes  mandatory and vice versa. In case neither of them is
passed in then it would look for C<--gdate>/C<--jday> flag and accordingly act on
it. In case none C<flag> passed in it would show the current calendar month.

    $ calendr --help

    USAGE: calendr [-h] [long options...]

lib/App/calendr.pm  view on Meta::CPAN

        --jday: Int
           Julian day

        --as_svg:
           Generate calendar in SVG format

        --list_month_names:
           List calendar month names

        --usage:
           show a short help message

        -h:

lib/App/calendr.pm  view on Meta::CPAN

        --man:
           show the manual

=head1 SUPPORTED CALENDARS

The following supported calendars can be installed individually.

=over 4

=item * L<Calendar::Bahai>

lib/App/calendr.pm  view on Meta::CPAN

sub BUILD {
    my ($self) = @_;

    my $plugins = [ plugins ];
    foreach my $plugin (@$plugins) {
        my $cal = _load_calendar($plugin);
        if (defined $cal) {
            my $inst_ver = ${plugin}->VERSION;
            my $min_ver  = $cal->{min_ver};
            my $cal_name = $cal->{name};
            if ($inst_ver >= $min_ver) {
                $self->{calendars}->{$cal_name} = $plugin->new;
            }
            else {
                $FAILED_CALENDARS->{$cal_name} = {
                    cal_name => $cal_name,
                    min_ver  => $min_ver,

lib/App/calendr.pm  view on Meta::CPAN

    my $month = $self->month;
    my $year  = $self->year;
    my $name  = $self->name || $DEFAULT_CALENDAR;

    my $supported_calendars = _supported_calendars();
    my $supported_cal = $supported_calendars->{uc($name)};
    die "ERROR: Unsupported calendar [$name] received.\n" unless defined $supported_cal;

    my $calendar = $self->get_calendar($name);
    # Is supported calendar installed?
    if (!defined $calendar) {
        # Is the calendar failed version pass min ver?
        if (exists $FAILED_CALENDARS->{$supported_cal->{name}}) {
            my $min_ver  = $FAILED_CALENDARS->{$supported_cal->{name}}->{min_ver};
            my $inst_ver = $FAILED_CALENDARS->{$supported_cal->{name}}->{inst_ver};
            my $cal_name = $FAILED_CALENDARS->{$supported_cal->{name}}->{cal_name};
            die sprintf("ERROR: Found %s v%s but required v%s.\n", $cal_name, $inst_ver, $min_ver);

lib/App/calendr.pm  view on Meta::CPAN

        else {
            die "ERROR: Missing month.\n" if defined $year;
        }

        if (defined $month) {
            if (ref($calendar) eq 'Calendar::Hebrew') {
                $calendar->date->validate_hebrew_month($month, $year);
            }
            else {
                $calendar->date->validate_month($month, $year);
            }
            if ($month =~ /^[A-Z]+$/i) {
                $month = $calendar->date->get_month_number($month);
            }
            $calendar->month($month);
        }

        if (defined $year) {
            $calendar->date->validate_year($year);
            $calendar->year($year);
        }
    }
    elsif (defined $self->gdate) {
        my $gdate = $self->gdate;
        die "ERROR: Invalid gregorian date '$gdate'.\n"
            unless ($gdate =~ /^\d{4}\-\d{2}\-\d{2}$/);

        my ($year, $month, $day) = split /\-/, $gdate, 3;
        print $calendar->from_gregorian($year, $month, $day) and return;
    }
    elsif (defined $self->jday) {
        my $julian_day = $self->jday;
        die "ERROR: Invalid julian day '$julian_day'.\n"
            unless ($julian_day =~ /^\d+\.?\d?$/);

        print $calendar->from_julian($julian_day) and return;
    }
    elsif (defined $self->list_month_names) {
        my $month_names = $calendar->date->months;
        shift @$month_names; # Remove empty entry.
        print join("\n", @$month_names), "\n" and return;
    }

    if (defined $self->as_svg) {
        print $calendar->as_svg, "\n";
    }
    else {
        print $calendar, "\n";
    }
}

sub get_calendar {
    my ($self, $name) = @_;

    return unless defined $name;
    my $supported_cals = _supported_calendars();
    my $cal_pkg = $supported_cals->{uc($name)}->{name};
    return $self->{calendars}->{$cal_pkg} if exists $self->{calendars}->{$cal_pkg};
    return;
}

#
#
# PRIVATE METHODS

sub _load_calendar {
    my ($plugin) = @_;
    return unless defined $plugin;

    my $calendars = _supported_calendars();
    foreach my $key (keys %$calendars) {
        return $calendars->{$key} if ($calendars->{$key}->{name} eq $plugin);
    }
    return;
}

sub _supported_calendars {

    return {
        'BAHAI'     => { name => 'Calendar::Bahai',     min_ver => 0.46 },
        'GREGORIAN' => { name => 'Calendar::Gregorian', min_ver => 0.15 },
        'HEBREW'    => { name => 'Calendar::Hebrew',    min_ver => 0.03 },

 view release on metacpan or  search on metacpan

lib/App/calx.pm  view on Meta::CPAN

our %SPEC;

$SPEC{':package'} = {
    v => 1.1,
    summary => 'Display a calendar, with highlighted dates',
};

sub _center {
    my ($w, $text) = @_;
    my $tw = length($text);

lib/App/calx.pm  view on Meta::CPAN

sub _rpad {
    my ($w, $text) = @_;
    sprintf("%s%s", $text, " " x ($w-ta_length($text)));
}

$SPEC{gen_monthly_calendar} = {
    v => 1.1,
    summary => 'Generate a single month calendar',
    description => <<'_',

Return [\@lines, \@hol]

_

lib/App/calx.pm  view on Meta::CPAN

        },
        dates => {
            schema => ['array*', of=>'hash*'],
        },
        caldates_modules => {
            schema => ['array*', of=>'perl::calendar::dates::modname*'],
            cmdline_aliases => {c=>{}},
        },
    },
    "x.perinci.sub.wrapper.disable_validate_args" => 1,
    result_naked => 1,
};
sub gen_monthly_calendar {
    my %args = @_;
    my $m = $args{month};
    my $y = $args{year};

    my @lines;

lib/App/calx.pm  view on Meta::CPAN

    }

    return [\@lines, $hol];
}

$SPEC{gen_calendar} = {
    v => 1.1,
    summary => 'Generate one or more monthly calendars in 3-column format',
    args => {
        months => {
            schema => ['int*', min=>1, max=>12, default=>1],
        },
        year => {

lib/App/calx.pm  view on Meta::CPAN

        dates => {
            schema => ['array*', of=>'hash*'],
        },
        caldates_modules => {
            schema => ['array*', of=>['perl::calendar::dates::modname*']],
        },

    },
    "x.perinci.sub.wrapper.disable_validate_args" => 1,
    args_rels => {
        choose_one => [qw/dates caldates_modules/],
        req_one => [qw/year dates/],
    },
};
sub gen_calendar {
    my %args = @_;
    my $dates = $args{dates};

    my @lines;
    my $tz = $args{time_zone} // $ENV{TZ} // "UTC";

lib/App/calx.pm  view on Meta::CPAN

                $margs{dates} = [
                    grep { $_->{month} == $mon && $_->{year} == $year }
                    @$dates];
            }

            push @moncals, gen_monthly_calendar(
                month=>$mon, year=>$year, time_zone=>$tz, %margs);
        } # for month

        # group per three months
        my @hol = map {@{ $_->[1] }} @moncals;

lib/App/calx.pm  view on Meta::CPAN

    [200, "OK", join("\n", @lines)];
}

1;
# ABSTRACT: Display a calendar, with highlighted dates

__END__

=pod

=encoding UTF-8

=head1 NAME

App::calx - Display a calendar, with highlighted dates

=head1 VERSION

This document describes version 0.009 of App::calx (from Perl distribution App-calx), released on 2023-06-22.

lib/App/calx.pm  view on Meta::CPAN

=head1 DESCRIPTION

=head1 FUNCTIONS


=head2 gen_calendar

Usage:

 gen_calendar(%args) -> [$status_code, $reason, $payload, \%result_meta]

Generate one or more monthly calendars in 3-column format.

This function is not exported.

Arguments ('*' denotes required arguments):

=over 4

=item * B<caldates_modules> => I<array[perl::calendar::dates::modname]>

(No description)

=item * B<dates> => I<array[hash]>

lib/App/calx.pm  view on Meta::CPAN

Return value:  (any)



=head2 gen_monthly_calendar

Usage:

 gen_monthly_calendar(%args) -> any

Generate a single month calendar.

Return [\@lines, \@hol]

This function is not exported.

Arguments ('*' denotes required arguments):

=over 4

=item * B<caldates_modules> => I<array[perl::calendar::dates::modname]>

(No description)

=item * B<dates> => I<array[hash]>

 view release on metacpan or  search on metacpan

script/contenttype  view on Meta::CPAN

application/vnd.sun.xml.impress.template	sti
application/vnd.sun.xml.math	sxm
application/vnd.sun.xml.writer	sxw
application/vnd.sun.xml.writer.global	sxg
application/vnd.sun.xml.writer.template	stw
application/vnd.sus-calendar	sus
application/vnd.sus-calendar	susp
application/vnd.svd	svd
application/vnd.symbian.install	sis
application/vnd.syncml+xml	xsm
application/vnd.syncml.dm+wbxml	bdm
application/vnd.syncml.dm+xml	xdm

script/contenttype  view on Meta::CPAN

model/vrml	wrz
model/x-pov	pov
model/x-x3d+binary	x3db
model/x-x3d+vrml	x3dv
model/x3d+xml	x3d
text/calendar	ics
text/calendar	icz
text/calendar	ifb
text/css	css
text/csv	csv
text/html	acgi
text/html	htm
text/html	html

script/contenttype  view on Meta::CPAN

text/x-uil	uil
text/x-uuencode	uu
text/x-uuencode	uue
text/x-vala	vala
text/x-vala	vapi
text/x-vcalendar	vcs
text/x-vcard	vcf
text/x-verilog	v
text/x-vhdl	vhd
text/x-vhdl	vhdl
text/x-vtt	vtt

 view release on metacpan or  search on metacpan

lib/App/gcal.pm  view on Meta::CPAN

# process an ics file
sub _process_file {
    my ($file) = @_;

    my $calendar = Data::ICal->new( filename => $file );
    unless ($calendar) {
        return _error("error parsing $file");
    }

    return $calendar;
}

# process a text event
sub _process_text {
    my ($text) = @_;

lib/App/gcal.pm  view on Meta::CPAN

    unless ($text) {
        return _error($error_msg);
    }

    require ICal::Format::Natural;
    my $calendar = ICal::Format::Natural::ical_format_natural($text);

    unless ( $calendar->isa('Data::ICal') ) {
        return _error($error_msg);
    }

    return $calendar;
}

# save event to Google Calendar
sub _save_to_gcal {
    my ( $cal, $username, $password ) = @_;

 view release on metacpan or  search on metacpan

lib/App/olson.pm  view on Meta::CPAN

}

sub _cmp_exception($$) { $_[0] cmp $_[1] }

#
# calendar dates
#

sub _caltime_offset($$) {
	my($rdns, $offset) = @_;
	return $rdns if _is_exception($rdns);

lib/App/olson.pm  view on Meta::CPAN

	die "minute number $mi is out of the range [0, 60)\n" unless $mi < 60;
	die "second number $s is out of the range [0, 60)\n" unless $s < 60;
	return [ $rdn, 3600*$h + 60*$mi + $s ];
}

$type{calendar_time} = {
	desc => "calendar time",
	present => \&_present_caltime,
	present_exception_width => 19,
	rx => $caltime_rx,
	parse => \&_parse_caltime,
	cmp => sub { $_[0]->[0] <=> $_[1]->[0] || $_[0]->[1] <=> $_[1]->[1] },

lib/App/olson.pm  view on Meta::CPAN

			return _now_absolute_time();
		} else {
			return _parse_caltime($_[0]);
		}
	},
	cmp => $type{calendar_time}->{cmp},
};

$type{country_code} = {
	desc => "country code",
	present => sub { $_[0] },

lib/App/olson.pm  view on Meta::CPAN

};

$attrclass{t} = $attrclass{local_time} = {
	desc => "local time",
	params => { "\@" => "absolute_time" },
	type => "calendar_time",
	cost => 11,
	get_needs => { z=>undef },
	curry_get => sub {
		my($when) = $_[0]->{"\@"};
		my $get_offs = $attrclass{offset}->{curry_get}->($_[0]);

 view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN

In addition to its own modules, **optex** can also use `Getopt::EX`
modules.  The standard `Getopt::EX` modules installed are these.

- -M**i18n** ([Getopt::EX::i18n](https://metacpan.org/pod/Getopt%3A%3AEX%3A%3Ai18n))

    You can display a Greek calendar by doing the following:

        optex -Mi18n cal --gr

# OPTIONS

 view release on metacpan or  search on metacpan

lib/App/week.pm  view on Meta::CPAN

=encoding utf-8

=head1 NAME

week - colorful calendar command for ANSI terminal

=head1 SYNOPSIS

B<week> [ -MI<module> ] [ option ] [ date ]

lib/App/week.pm  view on Meta::CPAN

Version 1.0303

=head1 DESCRIPTION

Yet another calendar command.  Read the script's manual for detail.

=head1 AUTHOR

Kazumasa Utashiro

 view release on metacpan or  search on metacpan

lib/App/wmiirc/Clock.pm  view on Meta::CPAN

      }
    }
    $self->render;

  } elsif($button == 3) {
    system "zenity", "--calendar";
    system "cal -y | xmessage -file -" if $? == -1;
  }
}

1;

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/date-formats.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/date-range.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/default.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/dropdown-month-year.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/icon-trigger.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/images/calendar.gif
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/index.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/inline.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/localization.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/min-max.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/multiple-calendars.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/other-months.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/datepicker/show-week.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/demos.css
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/dialog/animated.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/dialog/default.html

MANIFEST  view on Meta::CPAN

share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/droppable/shopping-cart.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/droppable/visual-feedback.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/effect/default.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/effect/easing.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/effect/index.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/images/calendar.gif
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/images/demo-config-on-tile.gif
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/images/demo-config-on.gif
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/images/demo-spindown-closed.gif
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/images/demo-spindown-open.gif
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/images/icon-docs-info.gif

 view release on metacpan or  search on metacpan

share/root/jquery-ui-1.11.1/jquery-ui.min.css  view on Meta::CPAN

* http://jqueryui.com
* Includes: core.css, accordion.css, autocomplete.css, button.css, datepicker.css, dialog.css, draggable.css, menu.css, progressbar.css, resizable.css, selectable.css, selectmenu.css, slider.css, sortable.css, spinner.css, tabs.css, tooltip.css, them...
* To view and modify this theme, visit http://jqueryui.com/themeroller/?ffDefault=Trebuchet%20MS%2CTahoma%2CVerdana%2CArial%2Csans-serif&fwDefault=bold&fsDefault=1.1em&cornerRadius=4px&bgColorHeader=f6a828&bgTextureHeader=gloss_wave&bgImgOpacityHeade...
* Copyright 2014 jQuery Foundation and other contributors; Licensed MIT */

.ui-helper-hidden{display:none}.ui-helper-hidden-accessible{border:0;clip:rect(0 0 0 0);height:1px;margin:-1px;overflow:hidden;padding:0;position:absolute;width:1px}.ui-helper-reset{margin:0;padding:0;border:0;outline:0;line-height:1.3;text-decoratio...

 view release on metacpan or  search on metacpan

lib/Arabic.pm  view on Meta::CPAN

    |  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

 view release on metacpan or  search on metacpan

t/chrome.t  view on Meta::CPAN

          ],
          "cookies": [],
          "content": {
            "size": 213057,
            "mimeType": "text/html",
            "text": "<!doctype html><html itemscope=\"\" itemtype=\"http://schema.org/WebPage\" lang=\"en-AU\"><head><meta content=\"/images/branding/googleg/1x/googleg_standard_color_128dp.png\" itemprop=\"image\"><link href=\"/images/branding/produ...
          },
          "redirectURL": "",
          "headersSize": -1,
          "bodySize": -1,
          "_transferSize": 68060

 view release on metacpan or  search on metacpan

t/Archive/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

 view release on metacpan or  search on metacpan

lib/ArrayData/Lingua/Word/EN/Enable.pm  view on Meta::CPAN

caleche
caleches
calefactories
calefactory
calendal
calendar
calendared
calendaring
calendars
calender
calendered
calenderer
calenderers
calendering

 view release on metacpan or  search on metacpan

lib/ArrayData/Word/EN/Enable.pm  view on Meta::CPAN

caleche
caleches
calefactories
calefactory
calendal
calendar
calendared
calendaring
calendars
calender
calendered
calenderer
calenderers
calendering