Result:
found more than 469 distributions - search limited to the first 2001 files matching your query
( run in 1.826 )
App-stopw
view release on metacpan or search on metacpan
- Add Enter as alias for S (start/stop).
- Change default refresh rate from 0.01s to 0.02s.
- Add whitespace at the end so cursor is less distracting.
0.01 2014-09-09 Released-By: PERLANCAR
- First release.
App-vidir
view release on metacpan or search on metacpan
ftplugin/vidir.vim view on Meta::CPAN
set cpo&vim
" Restore things when changing filetype.
let b:undo_ftplugin = "setl ofu< | augroup vidir_ls | exec 'au! CursorMoved,CursorMovedI <buffer>'|augroup END"
" do not allow the cursor to move back into the line numbers
function! s:on_cursor_moved()
let fname_pos = match(getline('.'), '^ *\d\+ \zs\S') + 1
let cur_pos = col('.')
if fname_pos < 1 || cur_pos >= fname_pos
" nothing to do
return
endif
" move cursor back to a sensible place
call cursor(line('.'), fname_pos)
endfunction
" do not allow non-numeric changes to the file index column
function! s:on_text_changed()
let broken_lines = []
ftplugin/vidir.vim view on Meta::CPAN
call setline(1, lines[1:])
endfunction
augroup vidir_ls
autocmd!
autocmd CursorMoved,CursorMovedI <buffer> call s:on_cursor_moved()
autocmd TextChanged,TextChangedI <buffer> call s:on_text_changed()
augroup END
"reset &cpo back to users setting
let &cpo = s:save_cpo
App-wordlist
view release on metacpan or search on metacpan
script/_wordlist view on Meta::CPAN
# v => 1.1,
# summary => 'Return line with point marked by a marker',
# description => <<'_',
#
#This is a utility function useful for testing/debugging. `parse_cmdline()`
#expects a command-line and a cursor position (`$line`, `$point`). This routine
#expects `$line` with a marker character (by default it's the caret, `^`) and
#return (`$line`, `$point`) to feed to `parse_cmdline()`.
#
#Example:
#
script/_wordlist view on Meta::CPAN
# description => <<'_',
#
#Optional. Known options:
#
#* `truncate_current_word` (bool). If set to 1, will truncate current word to the
# position of cursor, for example (`^` marks the position of cursor):
# `--vers^oo` to `--vers` instead of `--versoo`. This is more convenient when
# doing tab completion.
#
#_
# schema => 'hash*',
script/_wordlist view on Meta::CPAN
# # this is a workaround. since bash breaks words using characters in
# # $COMP_WORDBREAKS, which by default is "'@><=;|&(: this presents a problem
# # we often encounter: if we want to provide with a list of strings
# # containing say ':', most often Perl modules/packages, if user types e.g.
# # "Text::AN" and we provide completion ["Text::ANSI"] then bash will change
# # the word at cursor to become "Text::Text::ANSI" since it sees the current
# # word as "AN" and not "Text::AN". the workaround is to chop /^Text::/ from
# # completion answers. btw, we actually chop /^text::/i to handle
# # case-insensitive matching, although this does not have the ability to
# # replace the current word (e.g. if we type 'text::an' then bash can only
# # replace the current word 'an' with 'ANSI).
script/_wordlist view on Meta::CPAN
# % somecmd t<Tab>
# two three
#
#Another source is from a bash function (C<-F>). The function will receive input
#in two variables: C<COMP_WORDS> (array, command-line chopped into words) and
#C<COMP_CWORD> (integer, index to the array of words indicating the cursor
#position). It must set an array variable C<COMPREPLY> that contains the list of
#possible completion:
#
# % _foo()
# {
script/_wordlist view on Meta::CPAN
# % foo <Tab>
# --help --verbose --version
#
#And yet another source is an external command (C<-C>) including, from a Perl
#script. The command receives two environment variables: C<COMP_LINE> (string,
#raw command-line) and C<COMP_POINT> (integer, cursor location). Program must
#split C<COMP_LINE> into words, find the word to be completed, complete that, and
#return the list of words one per-line to STDOUT. An example:
#
# % cat foo-complete
# #!/usr/bin/perl
script/_wordlist view on Meta::CPAN
#Optional. Known options:
#
#=over
#
#=item * C<truncate_current_word> (bool). If set to 1, will truncate current word to the
#position of cursor, for example (C<^> marks the position of cursor):
#C<--vers^oo> to C<--vers> instead of C<--versoo>. This is more convenient when
#doing tab completion.
#
#=back
#
script/_wordlist view on Meta::CPAN
# point($cmdline, $marker) -> any
#
#Return line with point marked by a marker.
#
#This is a utility function useful for testing/debugging. C<parse_cmdline()>
#expects a command-line and a cursor position (C<$line>, C<$point>). This routine
#expects C<$line> with a marker character (by default it's the caret, C<^>) and
#return (C<$line>, C<$point>) to feed to C<parse_cmdline()>.
#
#Example:
#
script/_wordlist view on Meta::CPAN
#single dash will be completed. For example if you have `-foo=s` in your option
#specification, `-f<tab>` can complete it.
#
#This can be used to complete old-style programs, e.g. emacs which has options
#like `-nw`, `-nbc` etc (but also have double-dash options like
#`--no-window-system` or `--no-blinking-cursor`).
#
#_
# },
# },
# result_naked => 1,
script/_wordlist view on Meta::CPAN
#single dash will be completed. For example if you have C<-foo=s> in your option
#specification, C<< -fE<lt>tabE<gt> >> can complete it.
#
#This can be used to complete old-style programs, e.g. emacs which has options
#like C<-nw>, C<-nbc> etc (but also have double-dash options like
#C<--no-window-system> or C<--no-blinking-cursor>).
#
#=item * B<completion> => I<code>
#
#Completion routine to complete option valueE<sol>argument.
#
script/_wordlist view on Meta::CPAN
# summary => 'Command-line arguments',
# schema => ['array*' => {of=>'str*'}],
# req => 1,
# },
# cword => {
# summary => 'On which argument cursor is located (zero-based)',
# schema => 'int*',
# req => 1,
# },
# completion => {
# summary => 'Supply custom completion routine',
script/_wordlist view on Meta::CPAN
#
#=back
#
#=item * B<cword>* => I<int>
#
#On which argument cursor is located (zero-based).
#
#=item * B<extras> => I<hash>
#
#Add extra arguments to completion routine.
#
Applications-BackupAndRestore
view release on metacpan or search on metacpan
lib/Applications/BackupAndRestore.pm view on Meta::CPAN
To start up Backup & Restore from a terminal window, type B<BackupAndRestore> and then press C<Enter>.
Backup & Restore has a List View where you see every single backup with time, date, changed files and the exact space required on your harddrive.
Above the list view there is a File Chooser Button where you can select a folder to backup. Position the cursor over File Chooser Button and press the right mouse button. A pop-up menu appears. Choose a folder from the pop-up menu. Drag a folder ico...
Right hand to the File Chooser Button there is a Recycle Button. The recycle button keeps a list of folders you have saved. For example, place the cursor over the recycle button on a Backup & Restore window; then press the left mouse button to see a ...
Below the list view there is a backup button.
=head2 Backup In Progress Notification
AproJo
view release on metacpan or search on metacpan
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/dialog/modal-confirmation.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/dialog/modal-form.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/dialog/modal-message.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/dialog/modal.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/draggable/constrain-movement.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/draggable/cursor-style.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/draggable/default.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/draggable/delay-start.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/draggable/events.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/draggable/handle.html
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/demos/draggable/index.html
AquariumHive
view release on metacpan or search on metacpan
share/root/d3-3.4.11/d3.min.js view on Meta::CPAN
!function(){function n(n,t){return t>n?-1:n>t?1:n>=t?0:0/0}function t(n){return null!=n&&!isNaN(n)}function e(n){return{left:function(t,e,r,u){for(arguments.length<3&&(r=0),arguments.length<4&&(u=t.length);u>r;){var i=r+u>>>1;n(t[i],e)<0?r=i+1:u=i}re...
return t.precision=function(n){return arguments.length?(a=(i=n*n)>0&&16,t):Math.sqrt(i)},t}function Ge(n){var t=Je(function(t,e){return n([t*Ca,e*Ca])});return function(n){return er(t(n))}}function Ke(n){this.stream=n}function Qe(n,t){return{point:t,...
return o>=1?(i.event&&i.event.end.call(n,l,t),s()):void 0}function s(){return--u.count?delete u[e]:delete n.__transition__,1}var l=n.__data__,f=i.ease,h=i.delay,g=i.duration,p=Ba,v=[];return p.t=h+a,r>=h?o(r-h):(p.c=o,void 0)},0,a)}}function Uo(n,t){...
for(var o,e,p=-1/0,t=i.length-1,r=0,u=i[t];t>=r;u=e,++r)e=i[r],(o=a(u[1],e[0]))>p&&(p=o,l=e[0],h=u[1])}return x=M=null,1/0===l||1/0===f?[[0/0,0/0],[0/0,0/0]]:[[l,f],[h,g]]}}(),Zo.geo.centroid=function(n){hc=gc=pc=vc=dc=mc=yc=xc=Mc=_c=bc=0,Zo.geo.stre...
return c>=ys?n?"M0,"+i+"A"+i+","+i+" 0 1,1 0,"+-i+"A"+i+","+i+" 0 1,1 0,"+i+"M0,"+n+"A"+n+","+n+" 0 1,0 0,"+-n+"A"+n+","+n+" 0 1,0 0,"+n+"Z":"M0,"+i+"A"+i+","+i+" 0 1,1 0,"+-i+"A"+i+","+i+" 0 1,1 0,"+i+"Z":n?"M"+i*l+","+i*f+"A"+i+","+i+" 0 "+s+",1 "+...
Arango-DB
view release on metacpan or search on metacpan
lib/Arango/DB/API.pm view on Meta::CPAN
my %API = (
create_document => { method => 'post', uri => '{database}_api/document/{collection}' },
delete_collection => { method => 'delete', uri => '{database}_api/collection/{name}' },
delete_database => { method => 'delete', uri => '_api/database/{name}' },
list_collections => { method => 'get', uri => '{database}_api/collection' },
cursor_next => { method => 'put', uri => '{database}_api/cursor/{id}' },
cursor_delete => { method => 'delete', uri => '{database}_api/cursor/{id}' },
list_databases => { method => 'get', uri => '_api/database' },
status => { method => 'get', uri => '_admin/status' },
time => { method => 'get', uri => '_admin/time' },
statistics => { method => 'get', uri => '_admin/statistics' },
statistics_description => { method => 'get', uri => '_admin/statistics-description' },
lib/Arango/DB/API.pm view on Meta::CPAN
'version' => {
method => 'get',
uri => '_api/version',
params => { details => { type => 'boolean' } } ,
},
'create_cursor' => {
method => 'post',
uri => '{database}_api/cursor',
params => {
query => { type => 'string' },
count => { type => 'boolean' },
batchSize => { type => 'integer' },
cache => { type => 'boolean' },
Arango-Tango
view release on metacpan or search on metacpan
lib/Arango/Tango/API.pm view on Meta::CPAN
},
'list_collections' => {
rest => [ get => '{{database}}_api/collection'],
schema => { excludeSystem => { type => 'boolean' } }
},
'cursor_next' => {
rest => [ put => '{{database}}_api/cursor/{id}']
},
'cursor_delete' => {
rest => [ delete => '{{database}}_api/cursor/{id}']
},
'accessible_databases' => {
rest => [ get => '_api/database/user']
},
'all_keys' => {
rest => [ put => '{{database}}_api/simple/all-keys' ],
schema => { type => { type => 'string' }, collection => { type => 'string' } },
},
'create_cursor' => {
rest => [ post => '{{database}}_api/cursor' ],
schema => {
query => { type => 'string' },
count => { type => 'boolean' },
batchSize => { type => 'integer' },
cache => { type => 'boolean' },
ArangoDB
view release on metacpan or search on metacpan
lib/ArangoDB.pm view on Meta::CPAN
# Create hash index.
$foo->ensure_hash_index([qw/x y/]);
# Simple query
my $cursor = $db->('new_name')->by_example({ b => 2 });
while( my $doc = $cursor->next ){
# do something
}
# AQL
my $cursor2 = $db->query(
'FOR u IN users FILTER u.age > @age SORT u.name ASC RETURN u'
)->bind( { age => 19 } )->execute();
my $docs = $cursor2->all;
=head1 DESCRIPTION
This module is an ArangoDB's REST API client for Perl.
ArangoDB2
view release on metacpan or search on metacpan
lib/ArangoDB2/Cursor.pm view on Meta::CPAN
return $self->data && $self->data->{count};
}
# delete
#
# DELETE /_api/cursor/{cursor-identifier}
sub delete
{
my($self) = @_;
# need data
return unless $self->data
and $self->data->{hasMore};
return $self->arango->http->delete(
$self->api_path('cursor', $self->data->{id}),
);
}
# each
#
lib/ArangoDB2/Cursor.pm view on Meta::CPAN
return $self->data && $self->data->{extra} && $self->data->{extra}->{fullCount};
}
# get
#
# PUT /_api/cursor/{cursor-identifier}
#
# get next batch of results from api
sub get
{
my($self) = @_;
# need data
return unless $self->data
and $self->data->{hasMore};
# request next batch
my $res = $self->arango->http->put(
$self->api_path('cursor', $self->data->{id}),
) or return;
# update internal state
$self->{data} = $res;
$self->{i} = 0;
lib/ArangoDB2/Cursor.pm view on Meta::CPAN
__END__
=head1 NAME
ArangoDB2::Cursor - ArangoDB cursor API methods
=head1 METHODS
=over 4
Archive-Har
view release on metacpan or search on metacpan
],
"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
],
"cookies": [],
"content": {
"size": 436180,
"mimeType": "text/javascript",
"text": "/* _GlobalPrefix_ */\n/* _Module_:quantum */\ntry{\nvar s_,s_aaa=\"function\"==typeof Object.defineProperties?Object.defineProperty:function(a,b,c){if(c.get||c.set)throw new TypeError(\"ES3 does not support getters and setters.\"...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": 0,
"_transferSize": 0
Archive-Libarchive-FFI
view release on metacpan or search on metacpan
lib/Archive/Libarchive/FFI/Function.pod view on Meta::CPAN
=head2 archive_entry_xattr_next
my $status = archive_entry_xattr_next($entry, $name, $buffer);
Retrieve the extended attribute (xattr) at the extended attributes (xattr) cursor, and
increment the cursor. If the cursor is already at the end, it will return ARCHIVE_WARN,
$name and $buffer will be undef. Here is an example which loops through all extended
attributes (xattr) for an archive entry:
archive_entry_xattr_reset($entry);
while(my $r = archive_entry_xattr_next($entry, my $name, my $value))
lib/Archive/Libarchive/FFI/Function.pod view on Meta::CPAN
=head2 archive_entry_xattr_reset
my $status = archive_entry_xattr_reset($entry);
Reset the internal extended attributes (xattr) cursor for the archive entry.
=head2 archive_errno
my $errno = archive_errno($archive);
Archive-Libarchive-XS
view release on metacpan or search on metacpan
lib/Archive/Libarchive/XS.xs view on Meta::CPAN
=head2 archive_entry_xattr_reset
my $status = archive_entry_xattr_reset($entry);
Reset the internal extended attributes (xattr) cursor for the archive entry.
=cut
#if HAS_archive_entry_xattr_reset
lib/Archive/Libarchive/XS.xs view on Meta::CPAN
=head2 archive_entry_xattr_next
my $status = archive_entry_xattr_next($entry, $name, $buffer);
Retrieve the extended attribute (xattr) at the extended attributes (xattr) cursor, and
increment the cursor. If the cursor is already at the end, it will return ARCHIVE_WARN,
$name and $buffer will be undef. Here is an example which loops through all extended
attributes (xattr) for an archive entry:
archive_entry_xattr_reset($entry);
while(my $r = archive_entry_xattr_next($entry, my $name, my $value))
Archive-Unzip-Burst
view release on metacpan or search on metacpan
unzip-6.0/WHERE view on Meta::CPAN
MacZip106c.hqx Macintosh combined Zip&UnZip application with GUI,
executables and docs (with encryption)
wiz###xN.exe WiZ #.## 32-bit (Win9x/NT/2K/XP/2K3) app+docs (self-extr.)
UnzpHist.zip complete changes-history of UnZip and its precursors
ZipHist.zip complete changes-history of Zip
ftp/web sites for the US-exportable sources and executables:
NOTE: Look for the Info-ZIP file names given above (not PKWARE or third-
ArrayData-Lingua-Word-EN-Enable
view release on metacpan or search on metacpan
lib/ArrayData/Lingua/Word/EN/Enable.pm view on Meta::CPAN
cursive
cursively
cursiveness
cursivenesses
cursives
cursor
cursorial
cursorily
cursoriness
cursorinesses
cursors
cursory
curst
curt
curtail
curtailed
curtailer
lib/ArrayData/Lingua/Word/EN/Enable.pm view on Meta::CPAN
precritical
precure
precured
precures
precuring
precursor
precursors
precursory
precut
precuts
precutting
predaceous
predaceousness
ArrayData-Lingua-Word-EN-Medical-Glutanimate
view release on metacpan or search on metacpan
lib/ArrayData/Lingua/Word/EN/Medical/Glutanimate.pm view on Meta::CPAN
precubital
precuneal
precunealis
precuneate
precuneus
precursor
precursory
Pred
Predair
Predamide
Predate
predation
ArrayData-Word-EN-Enable
view release on metacpan or search on metacpan
lib/ArrayData/Word/EN/Enable.pm view on Meta::CPAN
cursive
cursively
cursiveness
cursivenesses
cursives
cursor
cursorial
cursorily
cursoriness
cursorinesses
cursors
cursory
curst
curt
curtail
curtailed
curtailer
lib/ArrayData/Word/EN/Enable.pm view on Meta::CPAN
precritical
precure
precured
precures
precuring
precursor
precursors
precursory
precut
precuts
precutting
predaceous
predaceousness
Articulate
view release on metacpan or search on metacpan
t/public/css/normalize.css view on Meta::CPAN
/**
* 1. Avoid the WebKit bug in Android 4.0.* where (2) destroys native `audio`
* and `video` controls.
* 2. Correct inability to style clickable `input` types in iOS.
* 3. Improve usability and consistency of cursor style between image-type
* `input` and others.
*/
button,
html input[type="button"], /* 1 */
input[type="reset"],
input[type="submit"] {
-webkit-appearance: button; /* 2 */
cursor: pointer; /* 3 */
}
/**
* Re-set default cursor for disabled elements.
*/
button[disabled],
html input[disabled] {
cursor: default;
}
/**
* Remove inner padding and border in Firefox 4+.
*/
t/public/css/normalize.css view on Meta::CPAN
box-sizing: border-box; /* 1 */
padding: 0; /* 2 */
}
/**
* Fix the cursor style for Chrome's increment/decrement buttons. For certain
* `font-size` values of the `input`, it causes the cursor style of the
* decrement button to change from `default` to `text`.
*/
input[type="number"]::-webkit-inner-spin-button,
input[type="number"]::-webkit-outer-spin-button {
Aspect
view release on metacpan or search on metacpan
- Debundled various out-of-date testing libraries, and reverted
to more conventional build_requires dependencies now that our
downstream packaging systems have the ability to consume them.
- Since the code documents the Aspect::Advice->install method as
private (and it is undocumented) rename to ->_install as a
precursor to changing it's behaviour at an API level.
- Now that the descope execution of the closure hook is able to be
trusted, we no longer need the Aspect::Cleanup DESTROY-time
self-execution magick.
- Added the ->wantarray property to the AdviceContext object.
This is provided as a convenience to the user (since the wantarray)
Astro-FITS-HdrTrans
view release on metacpan or search on metacpan
lib/Astro/FITS/HdrTrans/FITS.pm view on Meta::CPAN
This determines the angle, in decimal degrees, of the declination or
latitude axis with respect to the second axis of the data array, measured
in the anticlockwise direction.
It first looks for the linear-transformation CD matrix, widely used
including by IRAF and the precursor to the PC matrix. If this is
absent, the routine attempts to find the standard transformation
matrix PC defined in the FITS WCS Standard. Either matrix is
converted into a single rotation angle.
In the absence of a PC matrix it looks for the CROTA2 keyword from the
At
view release on metacpan or search on metacpan
lib/At/Protocol/DID.pm view on Meta::CPAN
=head2 C<ensureValidDidRegex( ... )>
ensureValidDidRegex( 'did:method::nope' );
Validates a DID with cursory regex provided by the AT protocol designers. Throws errors on failure and returns a true
value on success.
=head1 See Also
L<https://atproto.com/specs/did>
AtteanX-Endpoint
view release on metacpan or search on metacpan
share/endpoint/www/css/docs.css view on Meta::CPAN
bottom: 4px;
}
a:link, a:visited, .quasilink {
color: #df0019;
cursor: pointer;
text-decoration: none;
}
a:hover, .quasilink:hover {
color: #800004;
AtteanX-Store-LMDB
view release on metacpan or search on metacpan
lib/AtteanX/Store/LMDB.pm view on Meta::CPAN
package AtteanX::Store::LMDB {
our $VERSION = '0.001';
use Moo;
use Type::Tiny::Role;
use Types::Standard qw(Bool Str InstanceOf HashRef);
use LMDB_File qw(:flags :cursor_op);
use Digest::SHA qw(sha256 sha256_hex);
use Scalar::Util qw(refaddr reftype blessed);
use Math::Cartesian::Product;
use List::Util qw(any all first);
use File::Path qw(make_path);
lib/AtteanX/Store/LMDB.pm view on Meta::CPAN
sub iterate_database {
my $self = shift;
my $db = shift;
my $handler = shift;
my $cursor = $db->Cursor;
eval {
local($LMDB_File::die_on_err) = 0;
my ($key, $value);
unless ($cursor->get($key, $value, MDB_FIRST)) {
while (1) {
$handler->($key, $value);
last if $cursor->get($key, $value, MDB_NEXT);
}
}
};
}
lib/AtteanX/Store/LMDB.pm view on Meta::CPAN
my $self = shift;
my $db = shift;
my $from = shift;
my $to = shift;
my $handler = shift;
my $cursor = $db->Cursor;
eval {
local($LMDB_File::die_on_err) = 0;
my $key = $from;
my $value;
unless ($cursor->get($key, $value, MDB_SET_RANGE)) {
while (1) {
use bytes;
my $c = $key cmp $to;
last if ($c >= 0);
$handler->($key, $value);
last if $cursor->get($key, $value, MDB_NEXT);
}
}
};
}
lib/AtteanX/Store/LMDB.pm view on Meta::CPAN
my $graphs_dbi = $txn->open('graphs');
my $quads_dbi = $txn->open('quads');
my $stats_dbi = $txn->open('stats');
$txn->put($quads_dbi, $qid, $qids);
my $graphs_cursor = $graphs->Cursor;
my $key = $gid;
my $empty = '';
eval {
local($LMDB_File::die_on_err) = 0;
if (my $err = $graphs_cursor->get($key, $empty, MDB_SET_RANGE)) {
$graphs_cursor->put($gid, $empty);
} else {
if ($key ne $gid) {
$graphs_cursor->put($gid, $empty);
}
}
};
$self->_add_quad_to_indexes($qid, \@ids, $txn);
lib/AtteanX/Store/LMDB.pm view on Meta::CPAN
}
unless (all { defined($_) } @remove_ids) {
return;
}
my $cursor = $quads->Cursor;
my ($key, $value);
eval {
local($LMDB_File::die_on_err) = 0;
unless ($cursor->get($key, $value, MDB_FIRST)) {
QUAD: while (1) {
my $qid = unpack('Q>', $key);
my (@ids) = unpack('Q>4', $value);
if ($ids[0] == $remove_ids[0] and $ids[1] == $remove_ids[1] and $ids[2] == $remove_ids[2] and $ids[3] == $remove_ids[3]) {
my $g = $ids[3];
$self->_remove_quad_to_indexes($qid, \@ids, $txn);
$cursor->del();
unless ($self->_graph_id_exists_with_txn($txn, $quads, $t2i, $g)) {
# no more quads with this graph, so delete it from the graphs table
my $graphs_cursor = $graphs->Cursor;
my $gid = pack('Q>', $g);
my $key = $gid;
my $empty = '';
unless ($graphs_cursor->get($key, $empty, MDB_SET_RANGE)) {
if ($gid eq $key) {
$graphs_cursor->del();
}
}
}
$txn->commit();
return;
}
} continue {
last if $cursor->get($key, $value, MDB_NEXT);
}
}
};
}
lib/AtteanX/Store/LMDB.pm view on Meta::CPAN
$self->add_quad($q);
}
}
if ($BULK_LOAD) {
my $empty = '';
my $graphs_cursor = $graphs_dbi->Cursor;
foreach my $gid (values %graphs) {
my $key = $gid;
eval {
local($LMDB_File::die_on_err) = 0;
if (my $err = $graphs_cursor->get($key, $empty, MDB_SET_RANGE)) {
$graphs_cursor->put($gid, $empty);
} else {
if ($key ne $gid) {
$graphs_cursor->put($gid, $empty);
}
}
};
}
$txn->put($stats_dbi, $next_quad, pack('Q>', $next));
Audio-Opusfile
view release on metacpan or search on metacpan
lib/Audio/Opusfile.pm view on Meta::CPAN
=item $of->B<raw_seek>(I<$offset>)
Seek to a byte offset relative to the compressed data.
This also scans packets to update the PCM cursor. It will cross a
logical bitstream boundary, but only if it can't get any packets out
of the tail of the link to which it seeks.
=item $of->B<pcm_seek>(I<$offset>)
Audio-Play-MPG123
view release on metacpan or search on metacpan
mpg123/tools/Mp3play view on Meta::CPAN
if($_ eq "kD")
{ # termcap's delete character
Display("reading-line") if(substr($ReadLine,$ReadingLineCurrentPos,1,"") ne "");
}
if($_ eq "kl")
{ # termcap's move cursor left key
$ReadingLineCurrentPos--;
$ReadingLineCurrentPos=0 if($ReadingLineCurrentPos<0);
$ReadingLineStartPos=$ReadingLineCurrentPos if($ReadingLineStartPos>$ReadingLineCurrentPos);
Display("reading-line");
}
if($_ eq "kr")
{ # termcap's move cursor right
# key
$ReadingLineCurrentPos++;
$ReadingLineCurrentPos=length($ReadLine) if($ReadingLineCurrentPos>length($ReadLine));
$ReadingLineStartPos=$ReadingLineCurrentPos-$Width+length($ReadingLinePrompt)+1 if($ReadingLineCurrentPos-$ReadingLineStartPos>=$Width-length($ReadingLinePrompt));
$ReadingLineStartPos=0 if($ReadingLineStartPos<0);
Display("reading-line");
}
if($_ eq "kh")
{ # termcap's move cursor home key
$ReadingLineStartPos=0;
$ReadingLineCurrentPos=0;
Display("reading-line");
}
if($_ eq "kH")
{ # termcap's move cursor hold
# down key
$ReadingLineCurrentPos=length($ReadLine);
$ReadingLineStartPos=$ReadingLineCurrentPos-$Width+length($ReadingLinePrompt)+1;
$ReadingLineStartPos=0 if($ReadingLineStartPos<0);
Display("reading-line");
mpg123/tools/Mp3play view on Meta::CPAN
{ # ASCII "Ctrl-L" - redraw screen
Display("full"); # display everything
next;
}
if(($_ eq "j")||($_ eq "kd"))
{ # ASCII "j" or termcap's cursor
# down key - move selection one
# line down
$SelectedTrack++;
$SelectedTrack=$#Track if($SelectedTrack>$#Track);
$StartVPos++ if($SelectedTrack>=$StartVPos+$ListHeight);
Display("list"); # update play list
next;
}
if(($_ eq "k")||($_ eq "ku"))
{ # ASCII "k" or termcap's cursor
# up key - move selection one
# line up
$SelectedTrack--;
$SelectedTrack=0 if($SelectedTrack<0);
$StartVPos-- if($SelectedTrack<$StartVPos);
Display("list"); # update play list
next;
}
if(($_ eq "g")||($_ eq "kh"))
{ # ASCII "g" or termcap's cursor
# home key - move selection to
# the top
$SelectedTrack=0;
$StartVPos=0;
Display("list"); # update play list
next;
}
if(($_ eq "G")||($_ eq "kH"))
{ # ASCII "G" or termcap's cursor
# hold down key - move selection
# to the bottom
$SelectedTrack=$#Track;
$StartVPos=$#Track-$ListHeight+1;
$StartVPos=0 if($StartVPos<0);
mpg123/tools/Mp3play view on Meta::CPAN
$StartVPos=0 if($StartVPos<0);
Display("list"); # update play list
next;
}
if(($_ eq "h")||($_ eq "kl"))
{ # ASCII "h" or termcap's cursor
# left key - shift play list
# window one character left
$StartHPos--;
$StartHPos=0 if($StartHPos<0);
Display("list"); # update play list
next;
}
if(($_ eq "l")||($_ eq "kr"))
{ # ASCII "l" or termcap's cursor
# right key - shift play list
# window one character right
$StartHPos++;
$StartHPos=$TrackTextMaxLength-ListWidth() if($StartHPos>$TrackTextMaxLength-ListWidth());
$StartHPos=0 if($StartHPos<0);
mpg123/tools/Mp3play view on Meta::CPAN
}
Display("sequence"); # update sequence display
}
sub GotoXY
{ # subroutine to put cursor to
# the given location on the
# screen
print STDOUT $TermCap->Tgoto('cm',int($_[0]),int($_[1]));
}
mpg123/tools/Mp3play view on Meta::CPAN
# display type (7-bit ascii)
return $Display{$_[0],$_7BitAsciiDisplay};
}
sub HideCursor
{ # subroutine to hide cursor
print STDOUT $TermCap->{'_vi'};
}
sub ShowCursor
{ # subroutine to show cursor
print STDOUT $TermCap->{'_ve'};
}
sub NormalMode
{ # subroutine to put terminal
Audio
view release on metacpan or search on metacpan
Data/Data.pm view on Meta::CPAN
(Code for this lifted from "Festival" speech system's speech_tools.)
=item $auto = $audio->autocorrelation($LENGTH)
Returns an (unscaled) autocorrelation function - can be used to cause
peaks when data is periodic - and is used as a precursor to LPC analysis.
=back 4
Audit-DBI-TT2
view release on metacpan or search on metacpan
examples/css/jquery-ui-1.10.2.custom.css view on Meta::CPAN
/* Interaction Cues
----------------------------------*/
.ui-state-disabled {
cursor: default !important;
}
/* Icons
----------------------------------*/
examples/css/jquery-ui-1.10.2.custom.css view on Meta::CPAN
border-bottom: 0;
}
.ui-datepicker .ui-datepicker-buttonpane button {
float: right;
margin: .5em .2em .4em;
cursor: pointer;
padding: .2em .6em .3em .6em;
width: auto;
overflow: visible;
}
.ui-datepicker .ui-datepicker-buttonpane button.ui-datepicker-current {
Authen-Krb5-Easy
view release on metacpan or search on metacpan
# */
CODE:
krb5_context context;
krb5_error_code code;
krb5_ccache ccache = NULL;
krb5_cc_cursor current;
krb5_creds creds;
krb5_principal princ;
krb5_flags flags;
bool expired = true;
time_t earliest = 0;
Authen-Krb5
view release on metacpan or search on metacpan
lib/Authen/Krb5.xs view on Meta::CPAN
typedef krb5_enc_tkt_part *Authen__Krb5__EncTktPart;
typedef krb5_error *Authen__Krb5__Error;
typedef krb5_address *Authen__Krb5__Address;
typedef krb5_keyblock *Authen__Krb5__Keyblock;
typedef krb5_keytab_entry *Authen__Krb5__KeytabEntry;
typedef krb5_kt_cursor *Authen__Krb5__KeytabCursor;
typedef krb5_cc_cursor *Authen__Krb5__CcacheCursor;
typedef krb5_keyblock *Authen__Krb5__KeyBlock;
static krb5_context context = NULL;
static krb5_error_code err;
static krb5_keytab_entry keytab_entry_init;
lib/Authen/Krb5.xs view on Meta::CPAN
else {
freed((SV*)cc);
XSRETURN_YES;
}
krb5_cc_cursor *
start_seq_get(cc)
Authen::Krb5::Ccache cc
CODE:
if (!New(0, RETVAL, 1, krb5_cc_cursor))
XSRETURN_UNDEF;
err = krb5_cc_start_seq_get(context, cc, RETVAL);
if (err)
XSRETURN_UNDEF;
OUTPUT:
RETVAL
Authen::Krb5::Creds
next_cred(cc, cursor)
krb5_cc_cursor *cursor
Authen::Krb5::Ccache cc
CODE:
if (!New(0, RETVAL, 1, krb5_creds))
XSRETURN_UNDEF;
err = krb5_cc_next_cred(context, cc, cursor, RETVAL);
if (err)
XSRETURN_UNDEF;
can_free((SV *)RETVAL);
OUTPUT:
RETVAL
void
end_seq_get(cc, cursor)
Authen::Krb5::Ccache cc
krb5_cc_cursor *cursor
CODE:
err = krb5_cc_end_seq_get(context, cc, cursor);
if (err)
XSRETURN_UNDEF;
XSRETURN_YES;
void
lib/Authen/Krb5.xs view on Meta::CPAN
if (err)
XSRETURN_UNDEF;
XSRETURN_YES;
void
end_seq_get(keytab, cursor)
Authen::Krb5::Keytab keytab
krb5_kt_cursor *cursor
CODE:
err = krb5_kt_end_seq_get(context, keytab, cursor);
if (err)
XSRETURN_UNDEF;
XSRETURN_YES;
Authen::Krb5::KeytabEntry
lib/Authen/Krb5.xs view on Meta::CPAN
OUTPUT:
RETVAL
Authen::Krb5::KeytabEntry
next_entry(keytab, cursor)
krb5_kt_cursor *cursor
Authen::Krb5::Keytab keytab
CODE:
if (!New(0, RETVAL, 1, krb5_keytab_entry))
XSRETURN_UNDEF;
err = krb5_kt_next_entry(context, keytab, RETVAL, cursor);
if (err)
XSRETURN_UNDEF;
can_free((SV *)RETVAL);
OUTPUT:
lib/Authen/Krb5.xs view on Meta::CPAN
err = krb5_kt_remove_entry(context, keytab, entry);
if (err)
XSRETURN_UNDEF;
XSRETURN_YES;
krb5_kt_cursor *
start_seq_get(keytab)
Authen::Krb5::Keytab keytab
CODE:
if (!New(0, RETVAL, 1, krb5_kt_cursor))
XSRETURN_UNDEF;
err = krb5_kt_start_seq_get(context, keytab, RETVAL);
if (err)
XSRETURN_UNDEF;
Avatica-Client
view release on metacpan or search on metacpan
lib/Avatica/Client.pm view on Meta::CPAN
// Results of preparing a statement
message Signature {
repeated ColumnMetaData columns = 1;
string sql = 2;
repeated AvaticaParameter parameters = 3;
CursorFactory cursor_factory = 4;
StatementType statementType = 5;
}
message ColumnMetaData {
uint32 ordinal = 1;
( run in 1.826 second using v1.01-cache-2.11-cpan-a5abf4f5562 )