view release on metacpan or search on metacpan
lib/Android/ElectricSheep/Automator.pm view on Meta::CPAN
		# object of type Android::ElectricSheep::Automator::ADB::Device
		# which is created when we call connect_device()
		'device-object' => undef,
		# a hash of installed apps by package name (e.g. android.google.calendar)
		# the value will be an AppProperties object if it was enquired or undef
		# if it wasn't. As the addition of apps is done in a lazy way, when
		# needed, unless specified otherwise. In any event open_app() will add an
		# AppProperties object if missing to the specified package.
		'apps' => {},
lib/Android/ElectricSheep/Automator.pm view on Meta::CPAN
    $mother->navigation_menu_home_button() or die;
    # the "square" overview button
    $mother->navigation_menu_overview_button() or die;
    # open/close apps
    $mother->open_app({'package'=>qr/calendar$/i}) or die;
    $mother->close_app({'package'=>qr/calendar$/i}) or die;
    # push pull files
    $mother->adb->pull($deviceFile, $localFile);
    $mother->adb->push($localFile, $deviceFileOrDir);
lib/Android/ElectricSheep/Automator.pm view on Meta::CPAN
will not send a message via Viber but it will mock it.
The live tests will sometimes fail because, so far,
something unexpected happened in the device. For example,
in testing sending input text to a text-edit widget,
the calendar will be opened and a new entry will be added
and its text-edit widget will be targeted. Well, sometimes
the calendar app will give you some notification
on startup and this messes up with the focus.
Other times, the OS will detect that some app is taking too
long to launch and pops up a notification about
"I<something is not responding, shall I close it>".
This steals the focus and sometimes it causes
view release on metacpan or search on metacpan
lib/AnyEvent/HTTPD/Router.pm view on Meta::CPAN
         my ( $httpd, $req ) = @_;
         $httpd->stop_request;
         $req->respond([
             200, 'ok', { 'X-Your-Method' => $req->method }, '' ]);
     },
     GET => '/calendar/:year/:month/:day' => sub {
         my ( $httpd, $req, $param ) = @_;
         my $calendar_entries = get_cal_entries(
             $param->{year}, $param->{month}, $param->{day}
         );
         $httpd->stop_request;
         $reg->respond([
             200, 'ok', { 'Content-Type' => 'application/json'},
             to_json($calendar_entries)
         ]);
     },
     GET => '/static-files/*' => sub {
         my ( $httpd, $req, $param ) = @_;
         my $requeted_file = $param->{'*'};
view release on metacpan or search on metacpan
AuthCookieDBIRadius.pm view on Meta::CPAN
 	 PerlAuthenHandler Apache::AuthCookieDBIRadius->authenticate
 	 PerlAuthzHandler Apache::AuthCookieDBIRadius->authorize
 	 require valid-user
	</Directory>
	# calendar
	<Directory /home/httpd/html/calendar>
 	 AuthType Apache::AuthCookieDBIRadius
 	 AuthName Portal
  	 PerlSetVar PortalDBI_a on
 	 PerlAuthenHandler Apache::AuthCookieDBIRadius->authenticate
 	 PerlAuthzHandler Apache::AuthCookieDBIRadius->authorize
view release on metacpan or search on metacpan
dtds/datastyl.mod view on Meta::CPAN
<!ENTITY % any-date "( number:day | number:month | number:year | number:era | number:day-of-week | number:week-of-year | number:quarter| number:hours | number:am-pm | number:minutes | number:seconds )">
<!ENTITY % date-style-content "( (number:text,(%any-date;,number:text?)+) | (%any-date;,number:text?)+ )">
<!ELEMENT number:date-style ( style:properties?, %date-style-content;, style:map* )>
<!ELEMENT number:day EMPTY>
<!ATTLIST number:day number:style (short|long) "short">
<!ATTLIST number:day number:calendar CDATA #IMPLIED>
<!ELEMENT number:month EMPTY>
<!ATTLIST number:month number:textual %boolean; "false">
<!ATTLIST number:month number:style (short|long) "short">
<!ATTLIST number:month number:calendar CDATA #IMPLIED>
<!ELEMENT number:year EMPTY>
<!ATTLIST number:year number:style (short|long) "short">
<!ATTLIST number:year number:calendar CDATA #IMPLIED>
<!ELEMENT number:era EMPTY>
<!ATTLIST number:era number:style (short|long) "short">
<!ATTLIST number:era number:calendar CDATA #IMPLIED>
<!ELEMENT number:day-of-week EMPTY>
<!ATTLIST number:day-of-week number:style (short|long) "short">
<!ATTLIST number:day-of-week number:calendar CDATA #IMPLIED>
<!ELEMENT number:week-of-year EMPTY>
<!ATTLIST number:week-of-year number:calendar CDATA #IMPLIED>
<!ELEMENT number:quarter EMPTY>
<!ATTLIST number:quarter number:style (short|long) "short">
<!ATTLIST number:quarter number:calendar CDATA #IMPLIED>
<!ENTITY % any-time "( number:hours | number:am-pm | number:minutes | number:seconds )">
<!ENTITY % time-style-content "( (number:text,(%any-time;,number:text?)+) | (%any-time;,number:text?)+)">
<!ELEMENT number:time-style ( style:properties?, %time-style-content;, style:map* )>
<!ELEMENT number:hours EMPTY>
view release on metacpan or search on metacpan
lib/Template/PSP/autoform.psp view on Meta::CPAN
{
  my $fname = $name . $diff;
  
  # display a text box with a date javascript
  print qq{<nobr><input type="text" name="$fname" size="10" maxlength="10" value="$value" /> };
  print qq{<a href="javascript:show_calendar('$form.$fname');" } .
        qq{onmouseover="window.status='Date Picker';return true;" } .
        qq{onmouseout="window.status='';return true;">};
  print qq{<img src="/images/calendar.gif" /></a></nobr>\n};
}
</perl>
</tag>
view release on metacpan or search on metacpan
lib/Apache/SdnFw/lib/Core.pm view on Meta::CPAN
	$s->add_action(function => 'search') if (defined($s->{o}{functions}{search}));
	$s->tt('list.tt',{ s => $s, list => \@list });
}
sub calendar {
	my $s = shift;
	my $start_day = shift || $s->{datetime}{ymd};
	my $months = shift || 1;
	croak "invalid calendar months value: $months" unless($months =~ m/^\d+$/);
	$months = 12 if ($months > 12);
	my @list = $s->db_q("
		SELECT d.stat_date, extract('dow' from d.stat_date) as dow,
			to_char(d.stat_date, 'Month YYYY') as month_name,
lib/Apache/SdnFw/lib/Core.pm view on Meta::CPAN
		$week{days}{$ref->{dow}}{date} = $ref->{stat_date};
	}
	push @weeks, { %week };
	my %calendar = (
		weeks => \@weeks,
		dow => {
			0 => { s => 'S', m => 'Sun', l => 'Sunday' },
			1 => { s => 'M', m => 'Mon', l => 'Monday' },
			2 => { s => 'T', m => 'Tue', l => 'Tuesday' },
lib/Apache/SdnFw/lib/Core.pm view on Meta::CPAN
			4 => { s => 'T', m => 'Thu', l => 'Thursday' },
			5 => { s => 'F', m => 'Fri', l => 'Friday' },
			6 => { s => 'S', m => 'Sat', l => 'Saturday' },
			},
		);
	return %calendar;
}
####################################
# PRIVATE STUFF
####################################
lib/Apache/SdnFw/lib/Core.pm view on Meta::CPAN
	foreach my $k (keys %{$s->{add_js}}) {
		next if ($k eq 'prototype');
		if ($k eq 'scriptaculous') {
			$return .= qq(<script type="text/javascript" src="/js/scriptaculous.js?effects,controls"></script>\n);
		} elsif ($k eq 'calendar') {
			$return .= qq(<script type="text/javascript" src="/js/calendar_date_select/calendar_date_select.js"></script>\n).
			qq(<script type="text/javascript" src="/js/calendar_date_select/format_iso_date.js"></script>\n);
		} else {
			$return .= qq(<script type="text/javascript" src="/js/$k.js"></script>\n);
		}
	}
lib/Apache/SdnFw/lib/Core.pm view on Meta::CPAN
	my $keyfield = shift || 'id';
	return $s->html_a("$s->{ubase}/$object/display?$keyfield=$id",$name);
}
sub html_input_calendar {
	my $s = shift;
	my $key = $s->escape(shift);
	my $value = $s->escape(shift);
	$key = "$s->{acfb}::$key" if ($s->{acfb});
	my $cal = $s->add_calendar($key);
	my $str = qq(<input $cal name="$key" value="$value" autocomplete="off" size="12">);
	return $str;
}
sub add_calendar {
	my $s = shift;
	my $id = shift;
	$s->add_js('calendar');
	return qq|id="$id" onclick="javascript: new CalendarDateSelect( \$('$id'), {close_on_click: true, embedded:true, year_range:1} );"|;
}
sub _head_add_title {
view release on metacpan or search on metacpan
lib/Apache2/API/Status.pm view on Meta::CPAN
    Content-Type: application/xml; charset="utf-8"
    Content-Length: 637
    <d:multistatus xmlns:d="DAV:">
        <d:response>
            <d:href>/calendars/johndoe/home/132456762153245.ics</d:href>
            <d:propstat>
                <d:prop>
                    <d:getetag>"xxxx-xxx"</d:getetag>
                </d:prop>
                <d:status>HTTP/1.1 200 OK</d:status>
            </d:propstat>
        </d:response>
        <d:response>
            <d:href>/calendars/johndoe/home/fancy-caldav-client-1234253678.ics</d:href>
            <d:propstat>
                <d:prop>
                    <d:getetag>"5-12"</d:getetag>
                </d:prop>
                <d:status>HTTP/1.1 200 OK</d:status>
view release on metacpan or search on metacpan
examples/apache/conf/filetypes.dat view on Meta::CPAN
  DisplayName:  Icon
  IconDesc:     %1
Extension:      .ics
  Type:         icsfile
  MimeType:     text/calendar
  DisplayName:  iCalendar File
  IconDesc:     C:\App\Office\OFFICE11\1033\OUTLLIBR.DLL,0
Extension:      .idb
  Type:         VisualStudio.idb.7.1
view release on metacpan or search on metacpan
t/htdocs/about.html view on Meta::CPAN
<div id="col1"> 
<div id="newsCalendar">
	
<h2><a href="http://iainstitute.org/calendar/">Events Calendar</a></h2>
		<p>April 17, 2013<br />	
		
	<h3><a href="http://iainstitute.org/calendar/001419.php#001419">ASI 2013 Annual Conference</a></h3><br />
		<p>April 18, 2013<br />	
		
	<h3><a href="http://iainstitute.org/calendar/001413.php#001413">TOGAF 9 and ArchiMate Foundation</a></h3><br />
		<p>April 22, 2013<br />	
		
	<h3><a href="http://iainstitute.org/calendar/001423.php#001423">WebVisions Portland</a></h3><br />
		<p>May 15, 2013<br />	
		
	<h3><a href="http://iainstitute.org/calendar/001395.php#001395">UX-LX: User Experience Lisbon</a></h3><br />
		<p>May 16, 2013<br />	
		
	<h3><a href="http://iainstitute.org/calendar/001424.php#001424">TOGAF 9.1 and ArchiMate Foundation</a></h3><br />
		<p>July 09, 2013<br />	
		
	<h3><a href="http://iainstitute.org/calendar/001420.php#001420">UXPA Conference DC 2013</a></h3><br />
<p>[<a href="http://iainstitute.org/calendar/">more events</a>]</p>
<h2><a href="http://iainstitute.org/news/">News</a></h2>
		<p>April 13, 2013<br />	
view release on metacpan or search on metacpan
ModProxyPerlHtml.pm view on Meta::CPAN
    RewriteCond     %{REQUEST_URI}  ^/mail$
    RewriteRule     ^/(.*)$ /$1/    [R]
    RewriteCond     %{REQUEST_URI}  ^/planet$
    RewriteRule     ^/(.*)$ /$1/    [R]
    # Add full path to the CGI to bypass the index.html redirect that may fail
    RewriteCond     %{REQUEST_URI}  ^/calendar/$
    RewriteRule     ^/(.*)/$ /$1/cgi-bin/wcal.pl    [R]
    RewriteCond     %{REQUEST_URI}  ^/calendar$
    RewriteRule     ^/(.*)$ /$1/cgi-bin/wcal.pl     [R]
    <Location /webmail/>
        ProxyPassReverse /
view release on metacpan or search on metacpan
lib/App/CalId.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/CalId.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/CalId.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/CalId.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/CalId.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/CalId.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 {~~@$_} map {$_->[0]} @moncals);
lib/App/CalId.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::CalId - Display Indonesian calendar on the command-line
=head1 VERSION
This document describes version 0.133 of App::CalId (from Perl distribution App-CalId), released on 2021-01-13.
lib/App/CalId.pm view on Meta::CPAN
 # See cal-id script provided in this distribution
=head1 DESCRIPTION
This module provides the B<cal-id> command to display Indonesian calendar on the
command-line.
=head1 FUNCTIONS
=head2 gen_calendar
Usage:
 gen_calendar(%args) -> [status, msg, payload, meta]
Generate one or more monthly calendars in 3-column format.
This function is not exported.
Arguments ('*' denotes required arguments):
lib/App/CalId.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/CalendarDatesUtils.pm view on Meta::CPAN
use warnings;
#use Log::ger;
our %SPEC;
$SPEC{list_calendar_dates_modules} = {
    v => 1.1,
    summary => 'List Calendar::Dates::* modules, without the prefix',
};
sub list_calendar_dates_modules {
    require Module::List::Tiny;
    my $mods = Module::List::Tiny::list_modules(
        "Calendar::Dates::", {list_modules=>1, recurse=>1});
    my @res = sort keys %$mods;
    for (@res) { s/\ACalendar::Dates::// }
    [200, "OK" ,\@res];
}
$SPEC{list_calendar_dates} = {
    v => 1.1,
    summary => 'List dates from one or more Calendar::Dates::* modules',
    args => {
        action => {
            schema => ['str*', in=>['list-dates', 'list-modules']],
lib/App/CalendarDatesUtils.pm view on Meta::CPAN
        ],
        'choose_all&' => [
        ],
    },
};
sub list_calendar_dates {
    my %args = @_; $args{'action'} //= "list-dates";my $arg_err; { no warnings ('void');if (exists($args{'action'})) { ((defined($args{'action'})) ? 1 : (($arg_err //= "Required but not specified"),0)) && ((!ref($args{'action'})) ? 1 : (($arg_err //=...
    my $action = $args{action};
    if ($action eq 'list-modules') {
        return list_calendar_dates_modules();
    }
    my @lt = localtime;
    my $year_today = $lt[5]+1900;
    my $mon_today  = $lt[4]+1;
lib/App/CalendarDatesUtils.pm view on Meta::CPAN
    my $mon  = $args{month};
    my $day  = $args{day};
    my $modules;
    if ($args{all_modules}) {
        $modules = list_calendar_dates_modules()->[2];
    } elsif ($args{modules}) {
        $modules = $args{modules};
    } else {
        return [400, "Please specify modules or all_modules"];
    }
lib/App/CalendarDatesUtils.pm view on Meta::CPAN
This distributions provides the following command-line utilities:
=over
=item * L<list-calendar-dates>
=item * L<list-calendar-dates-modules>
=back
=head1 FUNCTIONS
=head2 list_calendar_dates
Usage:
 list_calendar_dates(%args) -> [status, msg, payload, meta]
List dates from one or more Calendar::Dates::* modules.
This function is not exported.
lib/App/CalendarDatesUtils.pm view on Meta::CPAN
Return value:  (any)
=head2 list_calendar_dates_modules
Usage:
 list_calendar_dates_modules() -> [status, msg, payload, meta]
List Calendar::Dates::* modules, without the prefix.
This function is not exported.
view release on metacpan or search on metacpan
lib/App/CamelPKI/SysV/Apache.pm view on Meta::CPAN
    # Camel-PKI from the build directory if needed.
    my $perlswitches;
    if (my @blibs = grep { m/\bblib\W+lib\b/ } @INC) {
        my $perlincs = join(" ", map { "-I$_" } @blibs);
        $perlswitches = <<"PERLSWITCHES";
# As seen on http://www.catalystframework.org/calendar/2005/7:
PerlSwitches $perlincs
PERLSWITCHES
    }
    # FIXME: this is Gentoo- and  Edgy-specific.
view release on metacpan or search on metacpan
lib/App/Chart/Gtk2/HAxis.pm view on Meta::CPAN
display updates as the adjustment moves.
=item C<timebase> (C<App::Chart::Timebase> object, default undef)
The timebase for the dates displayed.  This is used to get the actual
calendar date represented by integer values from the C<adjustment>.
=back
=head1 SEE ALSO
view release on metacpan or search on metacpan
# Wrap all labels and inputs/textarea pairs in a div (Jquery)
$('input, textarea').each( (i,el) => { $el = $(el); $el.add($el.prev("label")).wrapAll('<div class="field"></div>') } )
#############################################################
## JQuery Datepicker (calendar)
#############################################################
# Nice dialog to show the date in jquery (calendar)
<link rel="stylesheet" type="text/css" href="assets\jquery-ui-1.12.1.min.css">
<script src="assets\jquery-3.4.1.min.js"></script>
<script src="assets\jquery-ui-1.12.1.min.js"></script>
function setup_datapicker() {
	$('#delivery_date')
view release on metacpan or search on metacpan
themes/bs2/static/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
lib/App/datetime.pod view on Meta::CPAN
=item * Comparing dates
=item * Date math (addition, subtraction)
=item * Other calendar-specific functions (i.e. holidays, days of week, etc)
=back
Numerous modules have been posted to CPAN allowing the Perl developer
to accomplish these tasks.
lib/App/datetime.pod view on Meta::CPAN
 http://search.cpan.org/search?module=Date::Manip
The most powerful and slowest (all perl, large)
of date manipulation packages.
Includes many obscure calendar-related functions.
 * Powerful parsing many different formats of dates
 * No explicit support for or formatting dates.
 * Non-perlstyle function names (internal caps, as in ParseDate())
 * Powerful support for date math (but slower than Date::Calc)
view release on metacpan or search on metacpan
lib/App/ElasticSearch/Utilities/Aggregations.pm view on Meta::CPAN
    composite => 1,
};
$Aggregations{date_histogram} = {
    params    => sub { { calendar_interval => $_[0] || '1h' } },
    type      => 'bucket',
    composite => 1,
};
lib/App/ElasticSearch/Utilities/Aggregations.pm view on Meta::CPAN
        }
    }
=item B<date_histogram>
Creates a histogram for date fields.  Positional parameter is the calendar_interval.
    date_histogram:field_name:1h
Results in:
    {
        "histogram.field_name": {
            "histogram": {
                "field": "field_name",
                "calendar_interval": "1h"
            }
        }
    }
=item B<geohash_grid>
view release on metacpan or search on metacpan
share/status/app/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
lib/App/Greple/ical.pm view on Meta::CPAN
1;
__DATA__
option default \
	--chdir=~/Library/Calendars/*.caldav/*.calendar/Events \
	--glob=*.ics
option --simple \
	--all --print print_simple
view release on metacpan or search on metacpan
share/jtca-katakana-guide-3.pl view on Meta::CPAN
ã«ãã¼ cover ï¼ï¼ï¼ãï¼
ã«ãã§ããªã¢ cafeteria ï¼ï¼ï¼ãï¼
ã«ãã©ã¼ coupler ï¼ï¼ï¼
ã«ã©ã¼ color ï¼ï¼ï¼
ã«ã«ãã£ã¼ culture ï¼ï¼ï¼
ã«ã¬ã³ãã¼ calendar ï¼ï¼ï¼
ã«ã³ãã© candela ï¼ï¼ï¼
ã«ã¼ã½ã« cursor ï¼ï¼ï¼ä¾å¤ãï¼ï¼ï¼
ã«ã¼ãã³ curtain ï¼ï¼ï¼
ã«ã¼ãã£ã¬ã³ cardigan ï¼ï¼ï¼ãï¼ï¼ï¼
ã«ã¼ã card ï¼ï¼ï¼
view release on metacpan or search on metacpan
_appowner:*:87:87:Application Owner:/var/empty:/usr/bin/false
_windowserver:*:88:88:WindowServer:/var/empty:/usr/bin/false
_spotlight:*:89:89:Spotlight:/var/empty:/usr/bin/false
_tokend:*:91:91:Token Daemon:/var/empty:/usr/bin/false
_securityagent:*:92:92:SecurityAgent:/var/db/securityagent:/usr/bin/false
_calendar:*:93:93:Calendar:/var/empty:/usr/bin/false
_teamsserver:*:94:94:TeamsServer:/var/teamsserver:/usr/bin/false
_update_sharing:*:95:-2:Update Sharing:/var/empty:/usr/bin/false
_installer:*:96:-2:Installer:/var/empty:/usr/bin/false
_atsserver:*:97:97:ATS Server:/var/empty:/usr/bin/false
_ftp:*:98:-2:FTP Daemon:/var/empty:/usr/bin/false
view release on metacpan or search on metacpan
### Search iCal data / iCal ã®ãã¼ã¿ãæ¤ç´¢ãã
    help   --ical Search iCal data
    option --ical \
            --all \
            --chdir ~/Library/Calendars/*.caldav/*.calendar/Events \
            --glob *.ics \
            --print print_ical_line
    
    __CODE__
    sub print_ical_line {
view release on metacpan or search on metacpan
lib/App/Guiio/Dialogs.pm view on Meta::CPAN
my $btnProgressBar = create_button('Progress Bar',$path .'images/widget-gtk-progressbar.png',TRUE);
my $btnScrollBar = create_button('Scroll Bar',$path .'images/widget-gtk-vscrollbar.png', TRUE);
my $btnSlider = create_button('Slider', $path .'images/widget-gtk-hscale.png', TRUE);
my $btnListbox = create_button('Listbox', $path .'images/widget-gtk-list.png',TRUE);
my $btnCombobox = create_button('Dropdown List', $path .'images/widget-gtk-combo.png',TRUE);
my $btnCalendar = create_button('Calendar',$path .'images/widget-gtk-calendar.png',TRUE);
my $btnRadioButton = create_button('Radio Button',$path . 'images/widget-gtk-radiobutton.png',TRUE);
my $btnCheckBox = create_button('Checkbox', $path .'images/widget-gtk-checkbutton.png',TRUE);
my $btnLabel = create_button('Label',$path . 'images/widget-gtk-label.png',TRUE);
$btnButton->signal_connect("clicked", sub { $self->activate_guiio_component('stencils/guiio/Button'); });
view release on metacpan or search on metacpan
bin/ikachan 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
script/list-idn-holidays view on Meta::CPAN
    read_env => 0,
);
$cmdline->run;
# ABSTRACT: List Indonesian holidays in calendar
# PODNAME: list-idn-holidays
__END__
=pod
=encoding UTF-8
=head1 NAME
list-idn-holidays - List Indonesian holidays in calendar
=head1 VERSION
This document describes version 0.064 of list-idn-holidays (from Perl distribution App-IndonesianHolidayUtils), released on 2021-07-24.
view release on metacpan or search on metacpan
lib/App/JobLog.pm view on Meta::CPAN
If it's a text file we just pop up an editor and validate the log on close. So I stuck with a log.
=head1 ACKNOWLEDGEMENTS
Thanks to Ricardo Signes for the redoubtable L<App::Cmd> which wires this all together, Dave Rolsky for L<DateTime>,
which does all the calendar math, and Ingy dE<ouml>t Net for L<IO::All>, which, via L<Tie::File> (thanks, Mark Jason
Dominus), makes random access to a log file trivial.
Thanks also to my wife Paula, who was my only beta tester other than myself.
=head1 SEE ALSO
view release on metacpan or search on metacpan
lib/App/MergeCal.pm view on Meta::CPAN
App::MergeCal
=head1 ABSTRACT
Command line program that merges iCal files into a single calendar.
=head1 SYNOPSIS
    use App::MergeCal;
lib/App/MergeCal.pm view on Meta::CPAN
  use URI;
  field $vfile_parser :param = Text::vFile::asData->new;
  field $title :param;
  field $output :param = '';
  field $calendars :param;
  field $objects;
=head1 METHODS
=head2 $app->calendars, $app->title, $app->output
Accessors for fields.
=cut
  method calendars { return $calendars }
  method title     { return $title }
  method output    { return $title }
=head2 $app->run
lib/App/MergeCal.pm view on Meta::CPAN
    $self->render;
  }
=head2 $app->gather
Access all of the calendars and gather their contents into $objects.
=cut
  method gather {
    $self->clean_calendars;
    for (@$calendars) {
      my $ics = get($_) or die "Can't get " . $_->as_string . "\n";
      $ics = encode_utf8($ics);
      open my $fh, '<', \$ics or die $!;
      my $data = $vfile_parser->parse( $fh );
lib/App/MergeCal.pm view on Meta::CPAN
    }
    say "$_\r" for Text::vFile::asData->generate_lines($combined);
  }
=head2 $app->clean_calendars
Ensure that all of the calendars are URIs. If a calendar doesn't have a scheme
then it is assumed to be a file URI.
=cut
  method clean_calendars {
    for (@$calendars) {
      $_ = URI->new($_) unless ref $_;
      if (! $_->scheme) {
        $_ = URI->new('file://' . $_);
      }
    }
lib/App/MergeCal.pm view on Meta::CPAN
for this file is C<config.json>. The contents of the file will look something
like this:
    {
      "title":"My Combined Calendar",
      "output":"my_calendar.ics",
      "calendars":[
        "https://example.com/some_calendar.ics",
        "https://example.com/some_other_calendar.ics",
      ]
    }
This configuration will read the the calendars from the URLs listed and
combine their contents into a file called C<my_calendar.ics> (which you will
presumably make available on the internet).
The <output> configuration option is optional. If it is omitted, then the
output will be written to C<STDOUT>.
view release on metacpan or search on metacpan
root/js/ext-3.3.1/resources/images/default/s.gif
root/js/ext-3.3.1/resources/images/default/shadow-c.png
root/js/ext-3.3.1/resources/images/default/shadow-lr.png
root/js/ext-3.3.1/resources/images/default/shadow.png
root/js/ext-3.3.1/resources/images/default/shared/blue-loading.gif
root/js/ext-3.3.1/resources/images/default/shared/calendar.gif
root/js/ext-3.3.1/resources/images/default/shared/glass-bg.gif
root/js/ext-3.3.1/resources/images/default/shared/hd-sprite.gif
root/js/ext-3.3.1/resources/images/default/shared/large-loading.gif
root/js/ext-3.3.1/resources/images/default/shared/left-btn.gif
root/js/ext-3.3.1/resources/images/default/shared/loading-balls.gif
view release on metacpan or search on metacpan
lib/App/MojoSlides/files/public/bootstrap.min.css view on Meta::CPAN
 * Copyright 2013 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 by @mdo and @fat.
 *//*! normalize.css v2.1.0 | MIT License | git.io/normalize */article,aside,details,figcaption,figure,footer,header,hgroup,main,nav,section,summary{display:block}audio,canvas,video{display:inline-block}audio:not([controls]){display:none;height:0}[hi...