Result:
found more than 661 distributions - search limited to the first 2001 files matching your query
( run in 0.741 )
CWB-CQP-More
view release on metacpan or search on metacpan
lib/CWB/CQP/More.pm view on Meta::CPAN
$self->{'status'} = 'ok'; # status of last executed command ('ok' or 'error')
$self->{'error_message'} = []; # arrayref to array containing message produced by last command (if any)
## handling of CQP progress messages
$self->{'progress'} = 0; # whether progress messages are activated
$self->{'progress_handler'} = undef; # optional callback for progress messages
$self->{'progress_info'} = []; # contains last available progress information: [$total_percent, $pass, $n_passes, $message, $percent]
## debugging (prints more or less everything on stdout)
$self->{'debug'} = 0;
## select vectors for CQP output (stdout, stderr, stdout|stderr)
$self->{'select_err'} = new IO::Select($err);
$self->{'select_out'} = new IO::Select($out);
CWB-Web
view release on metacpan or search on metacpan
lib/CWB/Web/Search.pm view on Meta::CPAN
if grep { defined $_->cpos2struc($keyword) } @preferred;
}
my $quality =
(($match->{'n'} - 1) + ($proximity_points / $sd) + ($preferred_points * $cnt_preferred / $no_of_keywords))
/ $total_points;
$match->{'quality'} = int ($quality*100 + 0.5); # rounded percentage
}
}
# sort matchlist by one the fields
# 'first' ... sort by first position in match
lib/CWB/Web/Search.pm view on Meta::CPAN
computed from the positions of all search I<keywords> in a match).
=item $m->{'quality'}
An estimate of the I<relevance> of this match. This ranking is given as a
percentage with 100% corresponding to a "perfect match". The matches found
by the I<query()> method are sorted according to their 'quality' value.
=item $m->{'summary'}
A text segment from the corpus containing most of the <keywords> found
CWB
view release on metacpan or search on metacpan
lib/CWB/CQP.pm view on Meta::CPAN
$query = $cqp->quote($cqp->quotemeta($word)); # escape all metacharacters
# activate CQP progress messages during query execution
$cqp->progress_on;
$status = $cqp->progress; # after starting CQP command with run()
($total, $pass, $n_passes, $msg, $percent) = $cqp->progress_info;
$cqp->progress_off;
$cqp->set_progress_handler(\&my_progress_handler); # user-defined handler
# shut down CQP server (exits gracefully)
lib/CWB/CQP.pm view on Meta::CPAN
$self->{'error_message'} = []; # arrayref to array containing message produced by last command (if any)
## handling of CQP progress messages
$self->{'progress'} = 0; # whether progress messages are activated
$self->{'progress_handler'} = undef; # optional callback for progress messages
$self->{'progress_info'} = []; # contains last available progress information: [$total_percent, $pass, $n_passes, $message, $percent]
## debugging (prints more or less everything on stdout)
$self->{'debug'} = 0;
## select vectors for CQP output (stdout, stderr, stdout|stderr)
lib/CWB/CQP.pm view on Meta::CPAN
next if $line eq "";
## handle progress messages if ProgressBar has been activated
if ($self->{'progress'} and $line =~ /^-::-PROGRESS-::-/) {
my ($pass, $n_passes, $message);
(undef, $pass, $n_passes, $message) = split /\t/, $line;
my $percent = ($message =~ /([0-9]+)\%\s*complete/) ? $1+0 : undef; # extract progress percentage, if present
my $total_percent = (100 * ($pass - 1) + ($percent || 0)) / $n_passes; # estimate total progress ($percent assumed to be 0% if not given)
$self->{'progress_info'} = [$total_percent, $pass, $n_passes, $message, $percent];
my $handler = $self->{'progress_handler'};
if (ref($handler) eq 'CODE') {
$handler->($total_percent, $pass, $n_passes, $message, $percent); # call user-defined progress handler
}
}
## regular output lines are collected in object's line buffer
else {
$line = $encoder->decode($line) if defined $encoder;
lib/CWB/CQP.pm view on Meta::CPAN
=item I<$cqp>->B<progress_off>;
=item I<$message> = I<$cqp>->B<progress>;
=item (I<$total>, I<$pass>, I<$n_passes>, I<$msg>, I<$percent>) = I<$cqp>->B<progress_info>;
CQP progress messages can be activated and deactivated with the B<progress_on> and B<progress_off> methods (corresponding to C<set ProgressBar on|off;> in CQP).
If active, progress information can be obtained with the method B<progress>, which returns the last progress message received from CQP. The B<progress_info> returns pre-parsed progress information, consisting of estimated total percentage of complet...
It is an error to call B<progress> or B<progress_info> without activating progress messages first.
=cut
lib/CWB/CQP.pm view on Meta::CPAN
else {
carp 'CWB::CQP: Progress messages have not been turned on yet (ignored)';
}
}
## poll current progress status (estimated total percentage, or detailed information)
sub progress {
my $self = shift;
croak 'CWB::CQP: No progress() information available, please call progress_on() first'
unless $self->{'progress'};
if (not $self->{'command'}) {
lib/CWB/CQP.pm view on Meta::CPAN
return $self->{'progress_info'}->[0];
}
}
sub progress_info {
croak 'USAGE: ($total_percent, $pass, $n_passes, $message, $percent) = $cqp->progress_info;'
unless @_ == 1 and wantarray;
my $self = shift;
croak 'CWB::CQP: No progress_info() available, please call progress_on() first'
unless $self->{'progress'};
if (not $self->{'command'}) {
CaCORE
view release on metacpan or search on metacpan
html/CaBIO.html view on Meta::CPAN
<dd>
<p>data type: <code>long</code></p>
</dd>
</li>
<dt><strong><a name="item_similaritypercentage">similarityPercentage</a></strong>
<dd>
<p>data type: <code>float</code></p>
</dd>
</li>
Cache-Adaptive-ByLoad
view release on metacpan or search on metacpan
lib/Cache/Adaptive/ByLoad.pm view on Meta::CPAN
},
});
=head1 DESCRIPTION
C<Cache::Adaptive::ByLoad> is a subclass of L<Cache::Adaptive>. The module adjusts cache lifetime by two factors; the load average of the platform and the percentage of the total time spent by the builder. In other words, the module tries to utiliz...
=head1 METHODS
=head2 new
Cache-Benchmark
view release on metacpan or search on metacpan
lib/Cache/Benchmark.pm view on Meta::CPAN
means: from 10% till 35% ... 7 times higher ...
...etc
=back
the key (percent) can be a FLOAT, value (weight) has to be an INT
=item B<accesslist>: ARRAYREF [default: undef]
sets the list of keys the benchmark-test will use in run(). (an ARRAYREF of INT) Usable to repeat exactly the same test
which was stored via L</get_generated_keylist()> or to define your own list. If you give an access list, all other parameters,
lib/Cache/Benchmark.pm view on Meta::CPAN
} elsif($test_type eq 'random') {
foreach(1..$access_counter) {
push(@$list, $self->_fill_key($self->_generate_random_number($keylist_length - 1), $key_length) );
}
} elsif($test_type eq 'weighted') {
my @sorted_percents = sort({ $a <=> $b } keys(%$weighted_config));
my $actual_step = shift(@sorted_percents);
my $plain_keylist = [];
foreach my $key ( 0..($keylist_length - 1) ) {
my $weight = 1;
if(defined($actual_step)) {
my $percent = (($key + 1) / $keylist_length) * 100;
$actual_step = shift(@sorted_percents) if($actual_step < $percent);
$weight = int($weighted_config->{$actual_step}) if(defined($actual_step));
}
foreach(1..$weight) {
push(@$plain_keylist, $self->_fill_key($key, $key_length));
}
Cache-Isolator
view release on metacpan or search on metacpan
lib/Cache/Isolator.pm view on Meta::CPAN
Optional. The seconds until lock becomes released. Defaults to 30 seconds.
=item early_expires_ratio
Optional. if early_expires_ratio was set to greater than zero, Cache::Isolator stores to duplicate the cache. One of them is set to expire earlier than normal. Cache::Isolator gets the cache has been set to expire early in the specified percentage. T...
my $cache = Cache::Isolator->new(
early_expires_ratio => 10, # This means 1/10 ratio
);
Cache-Memcached-XS
view release on metacpan or search on metacpan
lib/Cache/Memcached/XS.pm view on Meta::CPAN
# flag definitions
use constant F_STORABLE => 1;
use constant F_COMPRESS => 2;
# size savings required before saving compressed value
use constant COMPRESS_SAVINGS => 0.20; # percent
use vars qw($HAVE_ZLIB);
BEGIN {
$HAVE_ZLIB = eval "use Compress::Zlib (); 1;";
Cache-Memcached
view release on metacpan or search on metacpan
lib/Cache/Memcached.pm view on Meta::CPAN
# flag definitions
use constant F_STORABLE => 1;
use constant F_COMPRESS => 2;
# size savings required before saving compressed value
use constant COMPRESS_SAVINGS => 0.20; # percent
use vars qw($VERSION $HAVE_ZLIB $FLAG_NOSIGNAL $HAVE_SOCKET6);
$VERSION = "1.30";
BEGIN {
Capture-Tiny-Extended
view release on metacpan or search on metacpan
"Legal Entity" shall mean the union of the acting entity and all
other entities that control, are controlled by, or are under common
control with that entity. For the purposes of this definition,
"control" means (i) the power, direct or indirect, to cause the
direction or management of such entity, whether by contract or
otherwise, or (ii) ownership of fifty percent (50%) or more of the
outstanding shares, or (iii) beneficial ownership of such entity.
"You" (or "Your") shall mean an individual or Legal Entity
exercising permissions granted by this License.
Capture-Tiny
view release on metacpan or search on metacpan
"Legal Entity" shall mean the union of the acting entity and all
other entities that control, are controlled by, or are under common
control with that entity. For the purposes of this definition,
"control" means (i) the power, direct or indirect, to cause the
direction or management of such entity, whether by contract or
otherwise, or (ii) ownership of fifty percent (50%) or more of the
outstanding shares, or (iii) beneficial ownership of such entity.
"You" (or "Your") shall mean an individual or Legal Entity
exercising permissions granted by this License.
Catalyst-Authentication-Credential-Fallback
view release on metacpan or search on metacpan
"Legal Entity" shall mean the union of the acting entity and all
other entities that control, are controlled by, or are under common
control with that entity. For the purposes of this definition,
"control" means (i) the power, direct or indirect, to cause the
direction or management of such entity, whether by contract or
otherwise, or (ii) ownership of fifty percent (50%) or more of the
outstanding shares, or (iii) beneficial ownership of such entity.
"You" (or "Your") shall mean an individual or Legal Entity
exercising permissions granted by this License.
Catalyst-Authentication-Credential-GSSAPI
view release on metacpan or search on metacpan
"Legal Entity" shall mean the union of the acting entity and all
other entities that control, are controlled by, or are under common
control with that entity. For the purposes of this definition,
"control" means (i) the power, direct or indirect, to cause the
direction or management of such entity, whether by contract or
otherwise, or (ii) ownership of fifty percent (50%) or more of the
outstanding shares, or (iii) beneficial ownership of such entity.
"You" (or "Your") shall mean an individual or Legal Entity
exercising permissions granted by this License.
Catalyst-Controller-AutoAssets
view release on metacpan or search on metacpan
lib/Catalyst/Controller/AutoAssets.pm view on Meta::CPAN
perspective (and may even be slightly faster because it caches guessed Content-Types instead of calculating on every
request like Static::Simple).
=head2 When to use this module
This module is great for development, web applications, and any production site with a high percentage of
returning users. If you want to take maximum advantage of HTTP caching without any work or planning, this module
is for you. Or, if you just want an easy and flexible way to manage static content, performance benefits aside,
this module is also for you.
=head2 When not to
Catalyst-Controller-Imager
view release on metacpan or search on metacpan
lib/Catalyst/Helper/Controller/Imager.pm view on Meta::CPAN
# specify a default format
# default: jpg
#default_format => 'jpg',
# in case of jpeg, specify quality in percent
# default: 95%
# jpeg_quality => 95,
);
=head1 NAME
Catalyst-Model-DBIC-Schema-QueryLog
view release on metacpan or search on metacpan
lib/Catalyst/Model/DBIC/Schema/QueryLog.pm view on Meta::CPAN
$c->log->debug("Avg Statement Time: " . sprintf('%0.6f', $total / $qcount));
my $i = 0;
my $qs = $c->model('DBIC')->querylog_analyzer->get_sorted_queries();
foreach my $q (@$qs) {
my $q_total = sprintf('%0.6f', $q->time_elapsed);
my $q_percent = sprintf('%0.6f', ( ($q->time_elapsed / $total) * 100 ));
my $q_sql = $q->sql . ' : ' . join(', ', @{$q->params});
$c->log->debug("SQL: $q_sql");
$c->log->debug("Costs: $q_total, takes $q_percent");
last if ($i == 5);
$i++;
}
}
Catalyst-Plugin-AccessLog
view release on metacpan or search on metacpan
lib/Catalyst/Plugin/AccessLog/Formatter.pm view on Meta::CPAN
my $argument = qr/\{ ( [^}]+ ) \}/x;
my $longopt = qr/\[ ( [^]]+ ) \]/x;
if ($format =~ /\G \Z/cgx) { # Found end of string.
last;
} elsif ($format =~ /\G ( [^%]+ )/cgx) { # Found non-percenty text.
$output .= $1;
} elsif ($format =~ /\G \%\% /cgx) { # Literal percent
$output .= "%";
} elsif ($format =~ /\G \% $argument $longopt/cgx) { # Long opt with argument
$output .= $self->get_item($c, $2, $1);
} elsif ($format =~ /\G \% $longopt/cgx) { # Long opt
$output .= $self->get_item($c, $1);
lib/Catalyst/Plugin/AccessLog/Formatter.pm view on Meta::CPAN
options have both short escapes and long escapes, while incompatible options
have only long escapes.
Some escapes (currently C<%[time]>, C<%[apache_time]>, C<%[header]>, and
C<%[apache_header]>) may also take an argument, which can be optional or
required. The argument is placed inside B<curly braces> between the percent
sign and the name of the escape, for example C<%{User-agent}i> or
C<%{User-agent}[header]> to get the value of the C<User-agent> header.
A literal percent-sign can be produced in the output using the escape
sequence C<%%>.
=head2 Configuration
The following are optional arguments passed to
Catalyst-Plugin-UploadProgress
view release on metacpan or search on metacpan
lib/Catalyst/Plugin/UploadProgress/Static.pm view on Meta::CPAN
background-color: #667799;
width: 0px;
height: 20px
}
.progressmeter .meter .percent {
position: absolute;
top: 0px;
left: 0px;
width: 100%;
height: 20px;
lib/Catalyst/Plugin/UploadProgress/Static.pm view on Meta::CPAN
progress.elapsedtime = formatTime(progress.elapsedtime);
progress.remainingtime = formatTime(progress.remainingtime);
}
if (progress.size != 0)
progress.percent = Math.round(progress.received / progress.size * 100);
progress.size = formatBytes(progress.size);
progress.received = formatBytes(progress.received);
document.getElementById('progress').innerHTML = Jemplate.process('progress.jmpl', progress);
lib/Catalyst/Plugin/UploadProgress/Static.pm view on Meta::CPAN
var output = '';
try {
output += '<span class="progressmeter">\n <div class="meter">\n <div class="amount" style="width: ';
//line 3 "progress.jmpl"
output += stash.get('percent');
output += '%;"></div>\n <div class="percent" style="width: 100%">';
//line 4 "progress.jmpl"
output += stash.get('percent');
output += '%</div>\n </div>\n <table>\n <tbody>\n <tr>\n <th>Status:</th>\n <td>\n';
//line 17 "progress.jmpl"
if (stash.get('finished')) {
output += ' <span class="finished">Transfer complete (';
//line 12 "progress.jmpl"
Catalyst-Runtime
view release on metacpan or search on metacpan
lib/Catalyst/UTF8.pod view on Meta::CPAN
if one types a URL like this into the browser
http://localhost/example?♥=♥♥
When this goes 'over the wire' to your application server its going to be as
percent encoded bytes:
http://localhost/example?%E2%99%A5=%E2%99%A5%E2%99%A5
When L<Catalyst> encounters this we decode the percent encoding and the utf8
so that we can properly display this information (such as in the debugging
logs or in a response.)
[debug] Query Parameters are:
.-------------------------------------+--------------------------------------.
Catalyst-TraitFor-Model-DBIC-Schema-QueryLog
view release on metacpan or search on metacpan
lib/Catalyst/TraitFor/Model/DBIC/Schema/QueryLog.pm view on Meta::CPAN
$c->log->debug("Avg Statement Time: " . sprintf('%0.6f', $total / $qcount));
my $i = 0;
my $qs = $c->model('DBIC')->querylog_analyzer->get_sorted_queries();
foreach my $q (@$qs) {
my $q_total = sprintf('%0.6f', $q->time_elapsed);
my $q_percent = sprintf('%0.6f', ( ($q->time_elapsed / $total) * 100 ));
my $q_sql = $q->sql . ' : ' . join(', ', @{$q->params});
$c->log->debug("SQL: $q_sql");
$c->log->debug("Costs: $q_total, takes $q_percent");
last if ($i == 5);
$i++;
}
}
CatalystX-ASP
view release on metacpan or search on metacpan
lib/CatalystX/ASP/Parser.pm view on Meta::CPAN
}
$file_line_number += $head_data =~ s/\n//sg;
$head_data =~ s/\<\%.*?\%\>//sg;
$is_code_block += $head_data =~ s/\<\%//sg;
$is_code_block -= $head_data =~ s/\%\>//sg;
$is_code_block = $is_code_block > 0; # stray percents like height=100%> kinds of tags
# global directory, as well as includes dirs
$c->error( "Could not find $include in IncludesDir" )
unless $self->search_includes_dir( $include );
CatalystX-Crudite
view release on metacpan or search on metacpan
lib/CatalystX/Crudite/Util/Random.pm view on Meta::CPAN
perceived
perceiver
perceivers
perceives
perceiving
percent
percentage
percentages
percentile
percentiles
percents
perceptible
perceptibly
perception
perceptions
perceptive
CatalystX-Example-YUIUploader
view release on metacpan or search on metacpan
root/static/js/yui/build/profilerviewer/profilerviewer-beta-min.js view on Meta::CPAN
Copyright (c) 2008, Yahoo! Inc. All rights reserved.
Code licensed under the BSD License:
http://developer.yahoo.net/yui/license.txt
version: 2.5.0
*/
(function(){YAHOO.widget.ProfilerViewer=function(H,G){G=G||{};if(arguments.length==1&&!YAHOO.lang.isString(H)&&!H.nodeName){G=H;H=G.element||null;}if(!H&&!G.element){H=this._createProfilerViewerElement();}YAHOO.widget.ProfilerViewer.superclass.constr...
this._busy=true;}else{C.removeClass(this._busyEl,E.CLASS_BUSY);this._busy=false;}};D._genSortFunction=function(H,G){var J=H;var I=G;return function(L,K){if(I==YAHOO.widget.DataTable.CLASS_ASC){return L[J]-K[J];}else{return((L[J]-K[J])*-1);}};};var F=...
this.setAttributeConfig("filter",{value:G.filter||null,validator:YAHOO.lang.isFunction});this.setAttributeConfig("swfUrl",{value:G.swfUrl||"http://yui.yahooapis.com/2.5.0/build/charts/assets/charts.swf"});this.setAttributeConfig("maxChartFunctions",{...
Catmandu-Stat
view release on metacpan or search on metacpan
lib/Catmandu/Exporter/Stat.pm view on Meta::CPAN
statistics:
* name : the name of a field
* count : the number of occurences of a field in all records
* zeros : the number of records without a field
* zeros% : the percentage of records without a field
* min : the minimum number of occurences of a field in any record
* max : the maximum number of occurences of a field in any record
* mean : the mean number of occurences of a field in all records
* variance : the variance of the field number
* stdev : the standard deviation of the field number
* uniq~ : the estimated number of unique records
* uniq% : the estimated percentage of uniq values
* entropy : the minimum and maximum entropy in the field values (estimated value)
Details:
* entropy is an indication in the variation of field values (are some values more unique than others)
Catmandu
view release on metacpan or search on metacpan
lib/Catmandu/Fix/uri_decode.pm view on Meta::CPAN
=encoding utf8
=head1 NAME
Catmandu::Fix::uri_decode - percent decode a URI
=head1 SYNOPSIS
# '3%A9' => 'café'
uri_decode(place)
Cfn
view release on metacpan or search on metacpan
"Legal Entity" shall mean the union of the acting entity and all
other entities that control, are controlled by, or are under common
control with that entity. For the purposes of this definition,
"control" means (i) the power, direct or indirect, to cause the
direction or management of such entity, whether by contract or
otherwise, or (ii) ownership of fifty percent (50%) or more of the
outstanding shares, or (iii) beneficial ownership of such entity.
"You" (or "Your") shall mean an individual or Legal Entity
exercising permissions granted by this License.
Chart-Clicker
view release on metacpan or search on metacpan
lib/Chart/Clicker/Axis.pm view on Meta::CPAN
$default->domain_axis->format(sub { return $nf->format_number(shift); });
=head2 fudge_amount
The amount to 'fudge' the span of this axis. You should supply a
percentage (in decimal form) and the axis will grow at both ends by the
supplied amount. This is useful when you want a bit of padding above and
below the dataset.
As an example, a fugdge_amount of .10 on an axis with a span of 10 to 50
would add 5 to the top and bottom of the axis.
Chart-GGPlot
view release on metacpan or search on metacpan
examples/scale_continuous_02_01.pl view on Meta::CPAN
use 5.016;
use warnings;
use Getopt::Long;
use Chart::GGPlot qw(:all);
use Chart::GGPlot::Util::Scales qw(percent);
use PDL::Core qw(pdl);
use PDL::Primitive qw(random);
use Data::Frame;
srand(0);
examples/scale_continuous_02_01.pl view on Meta::CPAN
my $p = ggplot(
data => $df,
mapping => aes( x => 'x', y => 'y' )
)->geom_point()
->scale_y_continuous( labels => \&percent );
if ( defined $save_as ) {
$p->save($save_as);
}
else {
Chart-OFC
view release on metacpan or search on metacpan
lib/Chart/OFC/Dataset/Area.pm view on Meta::CPAN
=head2 opacity
This defines how opaque the bars are. When they are moused over, they
become fully opaque.
Defaults to 80 (percent).
=head2 fill_color
The color used to fill the area between the line and the X axis.
Chart-OFC2
view release on metacpan or search on metacpan
lib/Chart/OFC2/Pie.pm view on Meta::CPAN
=head1 SYNOPSIS
use Chart::OFC2::Pie;
my $pie = Chart::OFC2::Pie->new(
tip => '#val# of #total#<br>#percent# of 100%',
);
$pie->values([ (1 .. 5) ]);
$pie->values->labels([qw( IE Firefox Opera Wii Other)]);
$pie->values->colours([ '#d01f3c', '#356aa0', '#C79810', '#73880A', '#D15600' ]);
( run in 0.741 second using v1.01-cache-2.11-cpan-709fd43a63f )