Result:
found more than 443 distributions - search limited to the first 2001 files matching your query
( run in 1.412 )
App-Kit
view release on metacpan or search on metacpan
lib/App/Kit/Obj/FS.pm view on Meta::CPAN
# return 1;
# }
sub appdir {
my ($self) = @_;
return $self->spec->catdir( $self->bindir(), '.' . $self->_app->str->prefix . '.d' );
}
sub file_lookup {
my ( $self, @rel_parts ) = @_;
lib/App/Kit/Obj/FS.pm view on Meta::CPAN
require File::Spec;
return 'File::Spec';
},
);
has bindir => (
'is' => 'rw',
'lazy' => '1',
# 'isa' => sub { die "'bindir' must be a directory" unless -d $_[1] },
'default' => sub {
# PSGI/Plack $0
# 1. starman worker -Ilib … t/test.psgi
# 2. 500 error: Cannot find current script 'starman worker -Ilib … t/test.psgi' at …/FindBin.pm line 166.
lib/App/Kit/Obj/FS.pm view on Meta::CPAN
Lazy loads L<File::Spec> and returns the class accessor for L<File::Spec> methods. Setting this via new() is probably not a good idea.
my $dir = $fs->spec->catdir(…);
=head3 bindir
The applications main directory. Defaults to script’s directory or the current working directory.
Lazy loads L<FindBin> and L<Cwd>.
lib/App/Kit/Obj/FS.pm view on Meta::CPAN
The directory that belongs to the app.
It is a directory in the object’s base path called .$prefix.d (where $prefix is the _app attributes’s ->str->prefix):
$fs->bindir()/.$str->prefix().d/
=head2 file_lookup()
In scalar context returns the first path that exists for the given arguments.
lib/App/Kit/Obj/FS.pm view on Meta::CPAN
The final argument can be a config hashref with the inc key whose value is an array of paths.
The arguments are the pieces of the path you are interested in that get put together in a portable way.
my $conf = $fs->file_lookup('data', 'foo.json'); # e.g. …/my_app_bindir/.appkit.d/data/foo.json
The path is looked for in this order:
=over 4
App-Kritika
view release on metacpan or search on metacpan
kritika.fatpack view on Meta::CPAN
$fatpacked{"ExtUtils/Helpers/Windows.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'EXTUTILS_HELPERS_WINDOWS';
package ExtUtils::Helpers::Windows;$ExtUtils::Helpers::Windows::VERSION='0.05';use strict;use warnings FATAL=>'all';use Exporter 5.57 'import';our@EXPORT=qw/make_executable detildefy/;use Config;use Carp qw/carp croak/;use ExtUtils::PL2Bat 'pl2bat'...
EXTUTILS_HELPERS_WINDOWS
$fatpacked{"ExtUtils/InstallPaths.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'EXTUTILS_INSTALLPATHS';
package ExtUtils::InstallPaths;$ExtUtils::InstallPaths::VERSION='0.05';use 5.006;use strict;use warnings;use File::Spec ();use Carp ();use ExtUtils::Config 0.002;my%complex_accessors=map {$_=>1}qw/prefix_relpaths install_sets/;my%hash_accessors=map...
EXTUTILS_INSTALLPATHS
$fatpacked{"File/HomeDir.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'FILE_HOMEDIR';
package File::HomeDir;use 5.00503;use strict;use Carp ();use Config ();use File::Spec ();use File::Which ();use vars qw{$VERSION @ISA @EXPORT @EXPORT_OK $IMPLEMENTED_BY};BEGIN {$VERSION='0.05';require Exporter;@ISA=qw{Exporter};@EXPORT=qw{home};@EX...
FILE_HOMEDIR
kritika.fatpack view on Meta::CPAN
| (.)
)/xg){if (defined $1){$is_utf8=1 if (!defined$is_utf8)}else {$is_utf8=0 if (!defined$is_utf8);if ($is_utf8){return}}}return$is_utf8}1;
JSON_BACKPORTPP_COMPAT5006
$fatpacked{"Module/Build/Tiny.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'MODULE_BUILD_TINY';
package Module::Build::Tiny;$Module::Build::Tiny::VERSION='0.05';use strict;use warnings;use Exporter 5.57 'import';our@EXPORT=qw/Build Build_PL/;use CPAN::Meta;use ExtUtils::Config 0.003;use ExtUtils::Helpers 0.020 qw/make_executable split_like_sh...
MODULE_BUILD_TINY
$fatpacked{"Test/Deep.pm"} = '#line '.(1+__LINE__).' "'.__FILE__."\"\n".<<'TEST_DEEP';
use strict;use warnings;package Test::Deep;use Carp qw(confess);use Test::Deep::Cache;use Test::Deep::Stack;use Test::Deep::RegexpVersion;require overload;use Scalar::Util;my$Test;unless (defined$Test::Deep::NoTest::NoTest){require Test::Builder;$T...
$message
App-LDAP
view release on metacpan or search on metacpan
lib/App/LDAP/Command/Init.pm view on Meta::CPAN
my $ldap = Net::LDAP->new("ldapi://");
my $sasl = Authen::SASL->new(mechanism => "EXTERNAL")
->client_new("ldap", "localhost");
$ldap->bind(undef, sasl => $sasl);
for my $schema (keys %{$schemas}) {
my $file = IO::String->new($schemas->{$schema});
my $entry = Net::LDAP::LDIF->new($file, "r", onerror => "die")->read_entry();
my $msg = $ldap->add($entry);
App-LXC-Container
view release on metacpan or search on metacpan
lib/App/LXC/Container.pm view on Meta::CPAN
distribution of the machine.
=item +
The applications do not need additional disk space (except for the
configuration files as well as some directories, bind-mounts and symbolic
links - we're writing about 250-2500 additional inodes and 500-2500 kB of
disk space).
=item +
lib/App/LXC/Container.pm view on Meta::CPAN
=head1 BEST PRACTICES
Especially external packages often haven't all their real dependencies
configured. For those it is often necessary to manually add some packages
and bind mount points like the following:
=head2 additional packages
Note that the examples are from Debian.
lib/App/LXC/Container.pm view on Meta::CPAN
=item locales (select C</usr/share/locale/locale.alias>)
=back
=head2 additional bind mounts
Note that again the examples are from Debian.
=over
App-MFILE-WWW
view release on metacpan or search on metacpan
share/js/core/jquery-3.2.1.js view on Meta::CPAN
/*! jQuery v3.2.1 | (c) JS Foundation and other contributors | jquery.org/license */
!function(a,b){"use strict";"object"==typeof module&&"object"==typeof module.exports?module.exports=a.document?b(a,!0):function(a){if(!a.document)throw new Error("jQuery requires a window with a document");return b(a)}:b(a)}("undefined"!=typeof windo...
a.removeEventListener("load",S),r.ready()}"complete"===d.readyState||"loading"!==d.readyState&&!d.documentElement.doScroll?a.setTimeout(r.ready):(d.addEventListener("DOMContentLoaded",S),a.addEventListener("load",S));var T=function(a,b,c,d,e,f,g){var...
null==d?void 0:d))},attrHooks:{type:{set:function(a,b){if(!o.radioValue&&"radio"===b&&B(a,"input")){var c=a.value;return a.setAttribute("type",b),c&&(a.value=c),b}}}},removeAttr:function(a,b){var c,d=0,e=b&&b.match(L);if(e&&1===a.nodeType)while(c=e[d...
App-MHFS
view release on metacpan or search on metacpan
share/public_html/static/hls.js view on Meta::CPAN
/******/ ([
/* 0 */
/***/ (function(module, __webpack_exports__, __webpack_require__) {
"use strict";
/* harmony export (binding) */ __webpack_require__.d(__webpack_exports__, "a", function() { return enableLogs; });
/* harmony export (binding) */ __webpack_require__.d(__webpack_exports__, "b", function() { return logger; });
/* harmony import */ var __WEBPACK_IMPORTED_MODULE_0__get_self_scope__ = __webpack_require__(3);
var _typeof = typeof Symbol === "function" && typeof Symbol.iterator === "symbol" ? function (obj) { return typeof obj; } : function (obj) { return obj && typeof Symbol === "function" && obj.constructor === Symbol && obj !== Symbol.prototype ? "symbo...
share/public_html/static/hls.js view on Meta::CPAN
for (var _len2 = arguments.length, functions = Array(_len2 > 1 ? _len2 - 1 : 0), _key2 = 1; _key2 < _len2; _key2++) {
functions[_key2 - 1] = arguments[_key2];
}
functions.forEach(function (type) {
exportedLogger[type] = debugConfig[type] ? debugConfig[type].bind(debugConfig) : consolePrintFn(type);
});
}
var enableLogs = function enableLogs(debugConfig) {
if (debugConfig === true || (typeof debugConfig === 'undefined' ? 'undefined' : _typeof(debugConfig)) === 'object') {
exportLoggerFunctions(debugConfig,
// Remove out from list here to hard-disable a log-level
// 'trace',
'debug', 'log', 'info', 'warn', 'error');
// Some browsers don't allow to use bind on console object anyway
// fallback to default if needed
try {
exportedLogger.log();
} catch (e) {
exportedLogger = fakeLogger;
share/public_html/static/hls.js view on Meta::CPAN
/***/ }),
/* 2 */
/***/ (function(module, __webpack_exports__, __webpack_require__) {
"use strict";
/* harmony export (binding) */ __webpack_require__.d(__webpack_exports__, "b", function() { return ErrorTypes; });
/* harmony export (binding) */ __webpack_require__.d(__webpack_exports__, "a", function() { return ErrorDetails; });
var ErrorTypes = {
// Identifier for a network error (loading error / timeout ...)
NETWORK_ERROR: 'networkError',
// Identifier for a media Error (video/parsing/mediasource error)
MEDIA_ERROR: 'mediaError',
share/public_html/static/hls.js view on Meta::CPAN
/***/ }),
/* 5 */
/***/ (function(module, __webpack_exports__, __webpack_require__) {
"use strict";
/* harmony export (binding) */ __webpack_require__.d(__webpack_exports__, "b", function() { return utf8ArrayToStr; });
function _classCallCheck(instance, Constructor) { if (!(instance instanceof Constructor)) { throw new TypeError("Cannot call a class as a function"); } }
/**
* ID3 parser
*/
share/public_html/static/hls.js view on Meta::CPAN
picWidthInMbsMinus1 = void 0,
picHeightInMapUnitsMinus1 = void 0,
frameMbsOnlyFlag = void 0,
scalingListCount = void 0,
i = void 0,
readUByte = this.readUByte.bind(this),
readBits = this.readBits.bind(this),
readUEG = this.readUEG.bind(this),
readBoolean = this.readBoolean.bind(this),
skipBits = this.skipBits.bind(this),
skipEG = this.skipEG.bind(this),
skipUEG = this.skipUEG.bind(this),
skipScalingList = this.skipScalingList.bind(this);
readUByte();
profileIdc = readUByte(); // profile_idc
profileCompat = readBits(5); // constraint_set[0-4]_flag, u(5)
skipBits(3); // reserved_zero_3bits u(3),
share/public_html/static/hls.js view on Meta::CPAN
audioData = audioTrack.pesData,
id3Data = id3Track.pesData,
parsePAT = this._parsePAT,
parsePMT = this._parsePMT,
parsePES = this._parsePES,
parseAVCPES = this._parseAVCPES.bind(this),
parseAACPES = this._parseAACPES.bind(this),
parseMPEGPES = this._parseMPEGPES.bind(this),
parseID3PES = this._parseID3PES.bind(this);
var syncOffset = TSDemuxer._syncOffset(data);
// don't parse last TS packet if incomplete
len -= (len + syncOffset) % 188;
share/public_html/static/hls.js view on Meta::CPAN
expGolombDecoder = void 0,
avcSample = this.avcSample,
push = void 0,
spsfound = false,
i = void 0,
pushAccesUnit = this.pushAccesUnit.bind(this),
createAVCSample = function createAVCSample(key, pts, dts, debug) {
return { key: key, pts: pts, dts: dts, units: [], debug: debug };
};
// free pes.data to save up some memory
pes.data = null;
share/public_html/static/hls.js view on Meta::CPAN
var event_handler_EventHandler = function () {
function EventHandler(hls) {
_classCallCheck(this, EventHandler);
this.hls = hls;
this.onEvent = this.onEvent.bind(this);
for (var _len = arguments.length, events = Array(_len > 1 ? _len - 1 : 0), _key = 1; _key < _len; _key++) {
events[_key - 1] = arguments[_key];
}
share/public_html/static/hls.js view on Meta::CPAN
var funcName = 'on' + event.replace('hls', '');
if (typeof this[funcName] !== 'function') {
throw new Error('Event ' + event + ' has no generic handler in this ' + this.constructor.name + ' class (tried ' + funcName + ')');
}
return this[funcName].bind(this, data);
};
try {
eventToFunction.call(this, event, data).call();
} catch (err) {
logger["b" /* logger */].error('An internal error happened while handling event ' + event + '. Error message: "' + err.message + '". Here is a stacktrace:', err);
share/public_html/static/hls.js view on Meta::CPAN
retryDelay: retryDelay,
maxRetryDelay: maxRetryDelay
};
var loaderCallbacks = {
onSuccess: this.loadsuccess.bind(this),
onError: this.loaderror.bind(this),
onTimeout: this.loadtimeout.bind(this)
};
logger["b" /* logger */].debug('Calling internal loader delegate for URL: ' + url);
loader.load(context, loaderConfig, loaderCallbacks);
share/public_html/static/hls.js view on Meta::CPAN
retryDelay: 0,
maxRetryDelay: config.fragLoadingMaxRetryTimeout
};
loaderCallbacks = {
onSuccess: this.loadsuccess.bind(this),
onError: this.loaderror.bind(this),
onTimeout: this.loadtimeout.bind(this),
onProgress: this.loadprogress.bind(this)
};
loader.load(loaderContext, loaderConfig, loaderCallbacks);
};
share/public_html/static/hls.js view on Meta::CPAN
var loaderContext = void 0,
loaderConfig = void 0,
loaderCallbacks = void 0;
loaderContext = { url: uri, frag: frag, responseType: 'arraybuffer' };
loaderConfig = { timeout: config.fragLoadingTimeOut, maxRetry: config.fragLoadingMaxRetry, retryDelay: config.fragLoadingRetryDelay, maxRetryDelay: config.fragLoadingMaxRetryTimeout };
loaderCallbacks = { onSuccess: this.loadsuccess.bind(this), onError: this.loaderror.bind(this), onTimeout: this.loadtimeout.bind(this) };
frag.loader.load(loaderContext, loaderConfig, loaderCallbacks);
} else if (this.decryptkey) {
// we already loaded this key, return it
decryptdata.key = this.decryptkey;
this.hls.trigger(events["a" /* default */].KEY_LOADED, { frag: frag });
share/public_html/static/hls.js view on Meta::CPAN
var forwardMessage = function (ev, data) {
data = data || {};
data.frag = this.frag;
data.id = this.id;
hls.trigger(ev, data);
}.bind(this);
// forward events to main thread
observer.on(events["a" /* default */].FRAG_DECRYPTED, forwardMessage);
observer.on(events["a" /* default */].FRAG_PARSING_INIT_SEGMENT, forwardMessage);
observer.on(events["a" /* default */].FRAG_PARSING_DATA, forwardMessage);
share/public_html/static/hls.js view on Meta::CPAN
if (config.enableWorker && typeof Worker !== 'undefined') {
logger["b" /* logger */].log('demuxing in webworker');
var w = void 0;
try {
w = this.w = webworkify_webpack_default()(/*require.resolve*/(12));
this.onwmsg = this.onWorkerMessage.bind(this);
w.addEventListener('message', this.onwmsg);
w.onerror = function (event) {
hls.trigger(events["a" /* default */].ERROR, { type: errors["b" /* ErrorTypes */].OTHER_ERROR, details: errors["a" /* ErrorDetails */].INTERNAL_EXCEPTION, fatal: true, event: 'demuxerWorker', err: { message: event.message + ' (' + event.fil...
};
w.postMessage({ cmd: 'init', typeSupported: typeSupported, vendor: vendor, id: id, config: JSON.stringify(config) });
share/public_html/static/hls.js view on Meta::CPAN
var _this = task_loop__possibleConstructorReturn(this, _EventHandler.call.apply(_EventHandler, [this, hls].concat(events)));
_this._tickInterval = null;
_this._tickTimer = null;
_this._tickCallCount = 0;
_this._boundTick = _this.tick.bind(_this);
return _this;
}
/**
* @override
share/public_html/static/hls.js view on Meta::CPAN
// Prefer the next fragment if it's within tolerance
if (fragNext && !fragment_finders_fragmentWithinToleranceTest(bufferEnd, maxFragLookUpTolerance, fragNext)) {
foundFrag = fragNext;
} else {
foundFrag = binary_search.search(fragments, fragment_finders_fragmentWithinToleranceTest.bind(null, bufferEnd, maxFragLookUpTolerance));
}
}
return foundFrag;
}
share/public_html/static/hls.js view on Meta::CPAN
this.hls.trigger(events["a" /* default */].BUFFER_FLUSHING, flushScope);
};
StreamController.prototype.onMediaAttached = function onMediaAttached(data) {
var media = this.media = this.mediaBuffer = data.media;
this.onvseeking = this.onMediaSeeking.bind(this);
this.onvseeked = this.onMediaSeeked.bind(this);
this.onvended = this.onMediaEnded.bind(this);
media.addEventListener('seeking', this.onvseeking);
media.addEventListener('seeked', this.onvseeked);
media.addEventListener('ended', this.onvended);
var config = this.config;
if (this.levels && config.autoStartLoad) {
share/public_html/static/hls.js view on Meta::CPAN
_this.lastLoadedFragLevel = 0;
_this._nextAutoLevel = -1;
_this.hls = hls;
_this.timer = null;
_this._bwEstimator = null;
_this.onCheck = _this._abandonRulesCheck.bind(_this);
return _this;
}
AbrController.prototype.destroy = function destroy() {
this.clearTimer();
share/public_html/static/hls.js view on Meta::CPAN
_this._live = null;
// cache the self generated object url to detect hijack of video tag
_this._objectUrl = null;
// Source Buffer listeners
_this.onsbue = _this.onSBUpdateEnd.bind(_this);
_this.onsbe = _this.onSBUpdateError.bind(_this);
_this.pendingTracks = {};
_this.tracks = {};
return _this;
}
share/public_html/static/hls.js view on Meta::CPAN
var media = this.media = data.media;
if (media) {
// setup the media source
var ms = this.mediaSource = new buffer_controller_MediaSource();
// Media Source listeners
this.onmso = this.onMediaSourceOpen.bind(this);
this.onmse = this.onMediaSourceEnded.bind(this);
this.onmsc = this.onMediaSourceClose.bind(this);
ms.addEventListener('sourceopen', this.onmso);
ms.addEventListener('sourceended', this.onmse);
ms.addEventListener('sourceclose', this.onmsc);
// link video and media Source
media.src = window.URL.createObjectURL(ms);
share/public_html/static/hls.js view on Meta::CPAN
return;
}
this.autoLevelCapping = Number.POSITIVE_INFINITY;
this.hls.firstLevel = this.getMaxLevel(this.firstLevel);
clearInterval(this.timer);
this.timer = setInterval(this.detectPlayerSize.bind(this), 1000);
this.detectPlayerSize();
};
CapLevelController.prototype._stopCapping = function _stopCapping() {
this.restrictedLevels = [];
share/public_html/static/hls.js view on Meta::CPAN
if (typeof video.getVideoPlaybackQuality === 'function') {
this.isVideoPlaybackQualityAvailable = true;
}
clearInterval(this.timer);
this.timer = setInterval(this.checkFPSInterval.bind(this), config.fpsDroppedMonitoringPeriod);
}
};
FPSController.prototype.checkFPS = function checkFPS(video, decodedFrames, droppedFrames) {
var currentTime = fps_controller_performance.now();
share/public_html/static/hls.js view on Meta::CPAN
if (context.rangeEnd) {
xhr.setRequestHeader('Range', 'bytes=' + context.rangeStart + '-' + (context.rangeEnd - 1));
}
xhr.onreadystatechange = this.readystatechange.bind(this);
xhr.onprogress = this.loadprogress.bind(this);
xhr.responseType = context.responseType;
// setup timeout before we perform request
this.requestTimeout = window.setTimeout(this.loadtimeout.bind(this), this.config.timeout);
xhr.send();
};
XhrLoader.prototype.readystatechange = function readystatechange(event) {
var xhr = event.currentTarget,
share/public_html/static/hls.js view on Meta::CPAN
// retry
logger["b" /* logger */].warn(status + ' while loading ' + context.url + ', retrying in ' + this.retryDelay + '...');
// aborts and resets internal state
this.destroy();
// schedule retry
this.retryTimeout = window.setTimeout(this.loadInternal.bind(this), this.retryDelay);
// set exponential backoff
this.retryDelay = Math.min(2 * this.retryDelay, config.maxRetryDelay);
stats.retry++;
}
}
} else {
// readyState >= 2 AND readyState !==4 (readyState = HEADERS_RECEIVED || LOADING) rearm timeout as xhr not finished yet
this.requestTimeout = window.setTimeout(this.loadtimeout.bind(this), config.timeout);
}
}
};
XhrLoader.prototype.loadtimeout = function loadtimeout() {
share/public_html/static/hls.js view on Meta::CPAN
}
};
AudioStreamController.prototype.onMediaAttached = function onMediaAttached(data) {
var media = this.media = this.mediaBuffer = data.media;
this.onvseeking = this.onMediaSeeking.bind(this);
this.onvended = this.onMediaEnded.bind(this);
media.addEventListener('seeking', this.onvseeking);
media.addEventListener('ended', this.onvended);
var config = this.config;
if (this.tracks && config.autoStartLoad) {
this.startLoad(config.startPosition);
share/public_html/static/hls.js view on Meta::CPAN
if (this.queuedDefaultTrack) {
this.subtitleTrack = this.queuedDefaultTrack;
delete this.queuedDefaultTrack;
}
this.trackChangeListener = this._onTextTracksChanged.bind(this);
this.useTextTrackPolling = !(this.media.textTracks && 'onchange' in this.media.textTracks);
if (this.useTextTrackPolling) {
this.subtitlePollingInterval = setInterval(function () {
_this2.trackChangeListener();
share/public_html/static/hls.js view on Meta::CPAN
});
return;
}
xhr.responseType = 'arraybuffer';
xhr.onreadystatechange = this._onLicenseRequestReadyStageChange.bind(this, xhr, url, keyMessage, callback);
return xhr;
};
/**
* @param {XMLHttpRequest} xhr
share/public_html/static/hls.js view on Meta::CPAN
/* harmony default export */ var eme_controller = (eme_controller_EMEController);
// CONCATENATED MODULE: ./src/utils/mediakeys-helper.js
var requestMediaKeySystemAccess = function () {
if (typeof window !== 'undefined' && window.navigator && window.navigator.requestMediaKeySystemAccess) {
return window.navigator.requestMediaKeySystemAccess.bind(window.navigator);
} else {
return null;
}
}();
share/public_html/static/hls.js view on Meta::CPAN
data[_key2 - 1] = arguments[_key2];
}
observer.removeListener.apply(observer, [event].concat(data));
};
this.on = observer.on.bind(observer);
this.off = observer.off.bind(observer);
this.once = observer.once.bind(observer);
this.trigger = observer.trigger.bind(observer);
// core controllers and network loaders
/**
* @member {AbrController} abrController
App-Magpie
view release on metacpan or search on metacpan
share/packages.skip view on Meta::CPAN
#
mdv-distrib-tools ; mageia/rpm toolchain
perl-Image-Magick ; from imagemagick
perl-kolab ; not updated since 2004
perl-Mail-SpamAssassin ; spamassassin should be handled with care
perl-qt4 ; from kdebindings
perl-SVN ; from subversion
perl-URPM ; rpm toolchain
App-MatrixClient
view release on metacpan or search on metacpan
lib/App/MatrixClient/RoomTab.pm view on Meta::CPAN
my $presence_summary = Tickit::Widget::Static->new( text => "" )
);
my $presence_float;
my $visible = 0;
$self->bind_key( 'F2' => sub {
$visible ? ( $presence_float->hide, $visible = 0 )
: ( $presence_float->show, $visible = 1 );
});
$room->configure(
App-MediaPi
view release on metacpan or search on metacpan
script/mediapi view on Meta::CPAN
my $status_label = $media_control_frame->new_ttk__label(-textvariable => \$track_status, -anchor => 'center');
$status_label->g_grid(-column => 0, -columnspan => 2, -row => 2, -sticky => 'nswe');
# This remove the focus and "active" decoration of the button when they are selected.
# We might want some kind of feedback that they were selected though.
Tkx::bind('TButton', '<FocusIn>', [sub { $wnd->g_focus(); Tkx::widget->new($_[0])->state('!active'); }, Tkx::Ev('%W')]);
# The commands are documented at https://abyz.me.uk/rpi/pigpio/pigs.html
# For now we don’t have a gpio for that as 18 is used by the I2S audio, we need
# to route another one to that pin on the screen.
# syswrite $pigpio, "w 18 1\n"; # Switch on the backlight of the screen.
#Tkx::bind('.', '<Create>', sub {
Tkx::after('idle', sub {
send_cmd(); # Used to read the greeting message until the first caret >.
get_status();
});
print "Starting main loop\n";
App-Mimosa
view release on metacpan or search on metacpan
root/js/ext-3.3.1/ext-all.js view on Meta::CPAN
* Ext JS Library 3.3.1
* Copyright(c) 2006-2010 Sencha Inc.
* licensing@sencha.com
* http://www.sencha.com/license
*/
(function(){var h=Ext.util,k=Ext.each,g=true,i=false;h.Observable=function(){var l=this,m=l.events;if(l.listeners){l.on(l.listeners);delete l.listeners}l.events=m||{}};h.Observable.prototype={filterOptRe:/^(?:scope|delay|buffer|single)$/,fireEvent:fu...
/* SWFObject v2.2 <http://code.google.com/p/swfobject/>
is released under the MIT License <http://www.opensource.org/licenses/mit-license.php>
*/
var swfobject=function(){var F="undefined",t="object",U="Shockwave Flash",Y="ShockwaveFlash.ShockwaveFlash",s="application/x-shockwave-flash",T="SWFObjectExprInst",z="onreadystatechange",Q=window,l=document,v=navigator,V=false,W=[i],q=[],P=[],K=[],n,...
App-MiseEnPlace
view release on metacpan or search on metacpan
lib/App/MiseEnPlace.pm view on Meta::CPAN
use YAML qw/ LoadFile /;
use Moo;
use MooX::HandlesVia;
has bindir => (
is => 'rw' ,
isa => Str ,
lazy => 1 ,
default => sub { path( File::HomeDir->my_home , 'bin' )->stringify } ,
);
lib/App/MiseEnPlace.pm view on Meta::CPAN
eval 'use IO::Page';
$self->_load_configs();
$self->_remove_bin_links($opt)
if $opt->{remove_bin_links} and -e -d $self->bindir();
$self->_create_dir( $_ ) for $self->all_directories();
$self->_create_link( $_ ) for $self->all_links();
}
lib/App/MiseEnPlace.pm view on Meta::CPAN
for my $link_pair ( @$link_array ) {
my( $src , $target ) = ( %$link_pair );
my $src_base = path( $src )->basename();
$target = $self->bindir() if $target =~ m'BIN$';
$target = path($target, $src_base)->stringify()
if path($target)->is_dir() and ! path( $src )->is_dir();
if (exists $link_targets{$target} ) {
say "ERROR: Attempting to create multiple links to the same target:";
lib/App/MiseEnPlace.pm view on Meta::CPAN
}
sub _remove_bin_links {
my( $self , $opt ) = @_;
my $bin = $self->bindir();
opendir( my $dh , $bin );
while ( readdir $dh ) {
my $path = path( $bin , $_ );
App-MojoSlides
view release on metacpan or search on metacpan
lib/App/MojoSlides.pm view on Meta::CPAN
- if desired for Perl code highlighting
=item L<Mousetrap|http://craig.is/killing/mice>
- simple javascript keybinding library
=back
=head1 DEDICATION
App-MonM
view release on metacpan or search on metacpan
bin/monm_snmp view on Meta::CPAN
$myobj = $obj;
} elsif ($obj =~ /^\.?(\d+\.)*\d+$/) {
if ($obj =~ /\.0$/) {
$myobj = [$obj];
} else {
$myobj = SNMP::Varbind->new([$obj,0]);
}
} else {
$obj .= '.0' unless $obj =~ /\.0$/;
$myobj = [$obj];
}
App-Mowyw
view release on metacpan or search on metacpan
lib/App/Mowyw.pm view on Meta::CPAN
|setvar
|readvar
|synatxfile
|syntax
|endsyntax
|bind
|for
|endfor
|ifvar
|endifvar
)/x ],
lib/App/Mowyw.pm view on Meta::CPAN
p_expect($tokens, "TAG_END", $meta);
return $str;
}
sub p_bind {
my ($tokens, $meta) = @_;
my $contents = strip_ws(slurp_upto_token($tokens, 'TAG_END', $meta));
my ($var, $rest) = split m/\s+/, $contents, 2;
my $string = qr{(
'[^'\\]*(?>\\.[^'\\]*)*'
|"[^"\\]*(?>\\.[^"\\]*)*'
|[^"']\S*
)}x;
my %options = parse_hash($rest, 'bind', $meta);
if ($options{file}){
$options{file} = get_include_filename('include', $options{file}, $meta->{FILES}->[-1]);
}
$meta->{VARS}{$var} = App::Mowyw::Datasource->new(\%options);
lib/App/Mowyw.pm view on Meta::CPAN
menu => \&p_menu,
item => \&p_item,
option => \&p_option,
verbatim => \&p_verbatim,
endverbatim => $error_sub->(qw(endverbatim verbatim)),
bind => \&p_bind,
comment => \&p_comment,
setvar => \&p_setvar,
readvar => \&p_readvar,
syntax => \&p_syntax,
syntaxfile => \&p_syntaxfile,
App-MultiLanguage
view release on metacpan or search on metacpan
lib/App/MultiLanguage/LDAP.pm view on Meta::CPAN
my $ldap = Net::LDAP->new ($self->{_ldap_server}, port => $self->{_ldap_port})
or croak "$!";
$self->{handler} = $ldap;
$self->_bind if (defined $self->{_ldap_user} && defined $self->{_ldap_pass} );
}
sub _bind {
my $self = shift;
my $result = $self->{handler}->bind($self->{_ldap_user},
password => $self->{_ldap_pass},
port => $self->{_ldap_port} );
croak "$!" if $result->code;
}
App-Music-ChordPro
view release on metacpan or search on metacpan
lib/ChordPro.pm view on Meta::CPAN
$options->{backend} = $pkg;
eval "require $pkg"."::Configurator";
warn("Warning: No configurator for ", $options->{generate}, "\n$@")
if $options->{trace} && $@;
# One configurator to bind them all.
# This will also call the backend Configurator, if any.
use ChordPro::Config;
$config = ChordPro::Config::configurator({});
# Now load the real backend. Note that the actual module name
App-Music-PlayTab
view release on metacpan or search on metacpan
lib/App/Music/PlayTab/Output/PostScript/Preamble.pm view on Meta::CPAN
%%DocumentFonts: Helvetica
%%EndComments
%%BeginProcSet: Symbols 0
/tabdict 50 dict def
tabdict begin
/m { moveto } bind def
/glyphwidth { % name *glyphwidth* wx wy
gsave nulldevice 0 0 moveto glyphshow currentpoint grestore
} bind def
/rshow {
dup stringwidth pop 2 div neg 0 rmoveto show
} bind def
/dim {
currentpoint
/MSyms findfont 7 scalefont setfont
1 8 rmoveto /Dim glyphshow moveto } def
/hdim {
App-Mxpress-PDF
view release on metacpan or search on metacpan
public/javascripts/ace/ext-beautify.js
public/javascripts/ace/ext-code_lens.js
public/javascripts/ace/ext-elastic_tabstops_lite.js
public/javascripts/ace/ext-emmet.js
public/javascripts/ace/ext-error_marker.js
public/javascripts/ace/ext-keybinding_menu.js
public/javascripts/ace/ext-language_tools.js
public/javascripts/ace/ext-linking.js
public/javascripts/ace/ext-modelist.js
public/javascripts/ace/ext-options.js
public/javascripts/ace/ext-prompt.js
public/javascripts/ace/ext-static_highlight.js
public/javascripts/ace/ext-statusbar.js
public/javascripts/ace/ext-textarea.js
public/javascripts/ace/ext-themelist.js
public/javascripts/ace/ext-whitespace.js
public/javascripts/ace/keybinding-emacs.js
public/javascripts/ace/keybinding-sublime.js
public/javascripts/ace/keybinding-vim.js
public/javascripts/ace/keybinding-vscode.js
public/javascripts/ace/mode-abap.js
public/javascripts/ace/mode-abc.js
public/javascripts/ace/mode-actionscript.js
public/javascripts/ace/mode-ada.js
public/javascripts/ace/mode-alda.js
App-Netdisco
view release on metacpan or search on metacpan
lib/App/Netdisco.pm view on Meta::CPAN
# restart the backend workers (wherever you run them)
~/bin/netdisco-backend restart
Furthermore, whenever you upgrade your Operating System, you must delete the
C<~/perl5> directory and re-run the following command, to update Netdisco's C
library bindings (and then run all of the above upgrade commands again):
curl -L https://cpanmin.us/ | perl - --notest --local-lib ~/perl5 App::Netdisco
=head1 Tips and Tricks
App-NetdiscoX-Web-Plugin-GraphLink
view release on metacpan or search on metacpan
share/views/plugin/graphlink/graphlink.js view on Meta::CPAN
$(document).ready(function() {
// bind qtip2 event to all future .nd_graphlink buttons
$('#ports_pane').on('mouseover', '.nd_graphlink', function(event) {
$(this).qtip({
overwrite: false,
content: {
attr: 'data-content'
App-NetdiscoX-Web-Plugin-GraphLinkSwitch
view release on metacpan or search on metacpan
share/views/plugin/graphlinkswitch/graphlinkswitch.js view on Meta::CPAN
$(document).ready(function() {
// bind qtip2 event to all future .nd_graphlinkswitch buttons
$('#ports_pane').on('mouseover', '.nd_graphlinkswitch', function(event) {
$(this).qtip({
overwrite: false,
content: {
attr: 'data-content'
App-NetdiscoX-Web-Plugin-JackLink
view release on metacpan or search on metacpan
share/views/plugin/jacklink/jacklink.js view on Meta::CPAN
$(document).ready(function() {
// bind qtip2 event to all future .nd_jacklink buttons
$('#ports_pane').on('mouseover', '.nd_jacklink', function(event) {
$(this).qtip({
overwrite: false,
content: {
attr: 'data-content'
App-NetdiscoX-Web-Plugin-JackReport
view release on metacpan or search on metacpan
lib/App/NetdiscoX/Web/Plugin/JackReport.pm view on Meta::CPAN
$sql = "SELECT BLDG, BUILDING, ROOM, JACK, PORT, DEVICE, EMAIL, REMARKS
FROM NETDISCO_VW WHERE DEVICE = ? AND PORT = ?";
$sth = $dbh->prepare($sql);
$sth->bind_param(1, "$q");
$sth->bind_param(2, "$f");
}
$sth->execute() or die $DBI::errstr;
App-NetdiscoX-Web-Plugin-Observium
view release on metacpan or search on metacpan
share/views/plugin/observium/observium.js view on Meta::CPAN
$(document).ready(function() {
// bind qtip2 event to all future .nd_observium buttons
$('#ports_pane').on('mouseover', '.nd_observium', function(event) {
$(this).qtip({
overwrite: false,
content: {
attr: 'data-content'
App-Netsync
view release on metacpan or search on metacpan
lib/App/Netsync/SNMP.pm view on Meta::CPAN
return undef unless defined $session;
}
my (@objects,@IIDs);
foreach my $OID (@$OIDs) {
my $query = SNMP::Varbind->new([$OID->[0]]);
while (my $object = $session->getnext($query)) {
last unless $query->tag eq $OID->[1] and not $session->{'ErrorNum'};
last if $object =~ /^ENDOFMIBVIEW$/;
$object =~ s/^\s*(.*?)\s*$/$1/;
push (@IIDs,$query->iid);
lib/App/Netsync/SNMP.pm view on Meta::CPAN
return undef if ref $session;
$session = SNMP $session;
return undef unless defined $session;
}
my $query = SNMP::Varbind->new([$OID,$IID,$value]);
$session->set($query);
return ($session->{'ErrorNum'}) ? $session->{'ErrorStr'} : 0;
}
App-Nostray
view release on metacpan or search on metacpan
bin/nostray view on Meta::CPAN
}
sub auto_remove_extra_comma {
my $src = [ split /\n/, shift ];
my $xtra = 0;
$cx->bind( src => $src );
my $reports = $cx->eval('jshint( src, { strict: false, es5: false } )');
for my $report (@$reports) {
$opt_R && print JSON->new->pretty->canonical->encode($report);
if ( $report->{reason} eq "Extra comma." ) {
substr $src->[ $report->{line} - 1 ], $report->{character} - 1, 1, '';
bin/nostray view on Meta::CPAN
// JavaScript. I retained Pratt's nomenclature.
// .nud Null denotation
// .fud First null denotation
// .led Left denotation
// lbp Left binding power
// rbp Right binding power
// They are elements of the parsing method called Top Down Operator Precedence.
function expression(rbp, initial) {
var left, isArray = false, isObject = false;
App-OverWatch
view release on metacpan or search on metacpan
lib/App/OverWatch/DB.pm view on Meta::CPAN
my $self = shift;
return $self->{Config}->db_type();
}
sub dbix_run {
my ($self, $sql, @bind_values) = @_;
my $conn = $self->_dbix_conn();
return $conn->run(
ping => sub {
my $ret = 0;
try {
$ret = $_->do( $sql, {}, @bind_values);
} catch {
warn "Caught exception: $_\n";
$ret = 0;
};
$ret;
});
}
sub dbix_select {
my ($self, $sql, @bind_values) = @_;
my $conn = $self->_dbix_conn();
return $conn->run( ping => sub {
my $sth = undef;
try {
$sth = $_->prepare( $sql );
$sth->execute( @bind_values );
} catch {
warn "Caught exception: $_\n";
$sth = undef;
};
$sth;
App-PDFLibrarian
view release on metacpan or search on metacpan
share/title_abbr_iso4.csv view on Meta::CPAN
"Binangun";"n.a.";"ind"
"binar-";"bin.";"eng"
"binasari";"n.a.";"ind"
"binational";"binatl.";"eng"
"binchois";"n.a.";"fre"
"bind-";"bind.";"eng"
"Bindery";"n.a.";"eng"
"Bingen";"Bing.";"ger"
"Binghamton";"Binghamt.";"eng"
"Binnenfischerei";"Binnenfisch.";"ger"
"Binnengewässer";"n.a.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"boerschopn";"n.a.";"dut"
"boēthos";"n.a.";"gre"
"boetiek";"n.a.";"dut"
"bog";"n.a.";"dan"
"BogÌŒazici";"n.a.";"tur"
"bogbinde-";"n.a.";"nor"
"Bogendruck";"n.a.";"ger"
"bogenschiessen";"bogenschiess.";"ger"
"bogeortegnelse";"n.a.";"dan"
"Boghazköi";"n.a.";"ger"
"bogol";"n.a.";"slv"
share/title_abbr_iso4.csv view on Meta::CPAN
"bonsoir";"n.a.";"fre"
"bony-";"n.a.";"swe"
"boodschap";"boddsch.";"dut"
"book";"n.a.";"eng"
"bookbank";"n.a.";"eng"
"bookbind-";"bookbind.";"eng"
"bookbuyer";"bookbuy.";"eng"
"bookdealer";"bookdeal.";"eng"
"bookfund";"bookf.";"eng"
"booking";"book.";"eng"
"bookkeep-";"bookkeep.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"Buch";"n.a.";"ger"
"Bucharchiv";"Bucharch.";"ger"
"Bucharest";"Buchar.";"eng"
"Buchberater";"Buchberat.";"ger"
"Buchbesprechung";"Buchbesprech.";"ger"
"Buchbinderei";"Buchbind.";"ger"
"Buchenwald";"n.a.";"ger"
"Bücher";"Büch.";"ger"
"Bücherei";"Büch.";"ger"
"Buchform";"n.a.";"ger"
"Buchführung";"Buchführ.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"ensoleilleÌ";"ensol.";"fre"
"ensoña-";"ensoñ.";"spa"
"Enspijk";"n.a.";"dut"
"enstitu-";"enst.";"tur"
"entatik-";"entatik.";"gre"
"Entbindung";"Entbind.";"ger"
"entdecken";"entdeck.";"ger"
"Entdeckung";"Entdeck.";"ger"
"entente";"n.a.";"fre"
"enteral";"enter.";"eng"
"enteric";"n.a.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"forastero";"n.a.";"spa"
"forbân";"n.a.";"dut"
"forbedring";"forbedr.";"dan"
"forberedelse";"forbered.";"dan"
"forbidden";"forbid.";"eng"
"forbind-";"forbind.";"dan"
"forbrug";"n.a.";"dan"
"forbrugger";"n.a.";"dan"
"forbruker";"n.a.";"nor"
"forbruksforskning";"forbruksforsk.";"nor"
"forbryd-";"forbryd.";"dan"
share/title_abbr_iso4.csv view on Meta::CPAN
"Forintek";"n.a.";"eng"
"forkortelse";"forkort.";"nor"
"förkortning";"förkortn.";"swe"
"forkynderen";"forkynd.";"dan"
"forlag";"forl.";"nor"
"forlagsbind";"forlagsb.";"nor"
"forma";"n.a.";"spa"
"formac-";"form.";"rus"
"formação";"form.";"por"
"formador";"form.";"spa"
"formænd";"n.a.";"dan"
share/title_abbr_iso4.csv view on Meta::CPAN
"Lotos";"n.a.";"ger"
"lotosov-";"lotos.";"hrv"
"lotta";"n.a.";"ita"
"Lotte";"n.a.";"dan"
"lottery";"n.a.";"eng"
"Lötverbindung-";"Lötverbind.";"ger"
"louage";"n.a.";"fre"
"loueur";"n.a.";"fre"
"Loughborough";"Loughb.";"eng"
"louhannais-";"louhan.";"fre"
"Louiseville";"Louisev.";"fre"
share/title_abbr_iso4.csv view on Meta::CPAN
"schweissen";"schweiss.";"ger"
"Schweisser";"Schweiss.";"ger"
"Schweisskonstrukt-";"Schweisskonstr.";"ger"
"Schweissmitteilung-";"Schweissmitt.";"ger"
"Schweisstechni-";"Schweisstech.";"ger"
"Schweissverbindung-";"Schweissverbind.";"ger"
"Schweitzerland";"Schweitz.";"ger"
"Schweiz";"n.a.";"ger"
"Schweizer-";"Schweiz.";"ger"
"Schwendi";"n.a.";"ger"
"Schwenningen";"Schwenn.";"ger"
share/title_abbr_iso4.csv view on Meta::CPAN
"verbal";"n.a.";"eng, fre"
"Verbänd-";"Verb.";"ger"
"verbatim";"verbat.";"eng"
"Verbesserung";"Verbess.";"ger"
"verbetering";"verbet.";"dut"
"verbinding";"verbind.";"dut"
"Verbindung";"Verbind.";"ger"
"verblijfsrecreatie";"verblijfsrecreat.";"dut"
"verblijv-";"verblijv.";"dut"
"verbond";"verb.";"dut"
"Verbrauch";"n.a.";"ger"
"Verbraucher";"Verbrauch.";"ger"
App-PerlTidy-Tk
view release on metacpan or search on metacpan
lib/App/PerlTidy/Tk.pm view on Meta::CPAN
$self->{top} = MainWindow->new();
if (exists $config->{geometry}) {
$self->{top}->geometry($config->{geometry});
}
$self->{top}->bind("<Control-Shift-plus>", sub { $self->zoom($zoom) });
$self->{top}->bind("<Control-minus>", sub { $self->zoom(-$zoom) });
$self->{top}->bind("<Control-q>", sub { $self->exit_app(); });
$self->create_menu;
$self->create_text_widget;
$self->create_config_panel;
App-PerlXLock
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
}
#==============================================================================
# Run time version of import (public method)
#==============================================================================
sub bind {
local ($/, $") = ("\n", ' '); local ($\, $,);
my ($code, @config);
my $o;
my ($pkg, $script) = caller;
my $class = shift;
croak M03_usage_bind() unless $class eq 'Inline';
$CONFIG{$pkg}{template} ||= $default_config;
my $language_id = shift or croak M03_usage_bind();
croak M03_usage_bind()
unless ($language_id =~ /^\S+$/ and $language_id !~ /\n/);
$code = shift or croak M03_usage_bind();
@config = @_;
my $next = 0;
for (@config) {
next if $next++ % 2;
croak M03_usage_bind() if /[\s\n]/;
}
$o = bless {}, $class;
$o->{INLINE}{version} = $VERSION;
$o->{API}{pkg} = $pkg;
$o->{API}{script} = $script;
inc/Inline.pm view on Meta::CPAN
END
return $usage;
}
sub M03_usage_bind {
my $usage = <<END;
Invalid usage of the Inline->bind() function. Valid usages are:
Inline->bind(language => "source-string", config-pair-list);
Inline->bind(language => "source-file", config-pair-list);
Inline->bind(language => [source-line-list], config-pair-list);
END
$usage .= <<END if defined $Inline::languages;
Supported languages:
( run in 1.412 second using v1.01-cache-2.11-cpan-2398b32b56e )