A list of distributions that don't return a valid
return statement. You can consider this distributions buggy. This list
is further broken down into the type of PPI::Statement class they
return. To view the full bad return value, click on the
'show'-link.
| ABNF-Grammar-0.08 | ABNF::Grammar | show |
| method new(Str $fname, @commands) {
my $class = ref($self) || $self;
$self = {_commands => { map {$_ => 1} @commands} };
bless($self, $class);
open(my $file, $fname)
or croak "Cant open $fname";
my $content = join("", <$file>) . "\... |
| ABNF-Grammar-0.08 | ABNF::Validator | show |
| method new(ABNF::Grammar $grammar) {
my $class = ref($self) || $self;
$self = { _grammar => $grammar };
bless($self, $class);
$self->_init();
return $self;
}
method _init() {
my $commands = $self->{_grammar}->commands();
$self->... |
| ABNF-Grammar-0.08 | ABNF::Generator | show |
| method new(ABNF::Grammar $grammar, ABNF::Validator $validator?) {
my $class = ref($self) || $self;
croak "Cant create instance of abstract class" if $class eq 'ABNF::Generator';
$self = {
_cache => {},
_grammar => $grammar,
_validator =&g... |
| ABNF-Grammar-0.08 | ABNF::Generator::Honest | show |
| method new(ABNF::Grammar $grammar, ABNF::Validator $validator?) {
$self->SUPER::new($grammar, $validator ? $validator : ());
}
method _range($rule, $recursion) {
my $converter = $CONVERTERS->{$rule->{type}};
my $min = $converter->($rule-&... |
| ABNF-Grammar-0.08 | ABNF::Generator::Liar | show |
| method new(ABNF::Grammar $grammar, ABNF::Validator $validator?) {
$self->SUPER::new($grammar, $validator ? $validator : ());
}
method _rule($rule, $recursion) {
my $result = "";
if ( my $prefix = splitRule($rule) ) {
do {
$result = _stringRa... |
| AI-MXNet-1.4 | AI::MXNet::Executor | show |
| func _get_dict(
ArrayRef[Str] $names,
ArrayRef[Maybe[AI::MXNet::NDArray]] $ndarrays
)
{
my %nset = ();
for my $nm (@{ $names })
{
if(exists $nset{ $nm })
{
confess("Duplicate names dete... |
| AI-MXNet-1.4 | AI::MXNet::Symbol | show |
| method Group(ArrayRef[AI::MXNet::Symbol] $symbols)
{
my @handles = map { $_->handle } @{ $symbols };
my $handle = check_call(AI::MXNetCAPI::SymbolCreateGroup(scalar(@handles), \@handles));
return __PACKAGE__->new(handle => $handle);
}... |
| AI-MXNet-1.4 | AI::MXNet::Optimizer | show |
| method get_updater(AI::MXNet::Optimizer $optimizer)
{
return AI::MXNet::Updater->new(optimizer => $optimizer);
}
1 |
| AI-MXNet-1.4 | AI::MXNet::KVStore | show |
| method init(
Str|ArrayRef[Str] $key,
AI::MXNet::NDArray|ArrayRef[AI::MXNet::NDArray]|ArrayRef[ArrayRef[AI::MXNet::NDArray]] $value
)
{
my ($keys, $vals) = _key_value($key, $value);
check_call(
AI::MXNetCAPI::KVStoreInitEx(
... |
| AI-MXNet-1.4 | AI::MXNet::Monitor | show |
| method install(AI::MXNet::Executor $exe)
{
$exe->set_monitor_callback($self->stat_helper);
push @{ $self->exes }, $exe;
}
method tic()
{
if ($self->step % $self->interval == 0)
{
for my $exe (@{ $self-&... |
| AI-MXNet-1.4 | AI::MXNet::Module::Private | show |
| method Module(@args) { return @args ? __PACKAGE__->new(@args) : __PACKAGE__ }
method BucketingModule(@args) { return AI::MXNet::Module::Bucketing->new(@args) }
method load(
Str $prefix,
Int $epoch,
Bool $load_optimizer_states=0,
%... |
| AI-MXNet-1.4 | AI::MXNet::LRScheduler | show |
| method call(Int $num_update)
{
while($self->cur_step_ind < @{ $self->step })
{
if($num_update > $self->step->[$self->cur_step_ind])
{
$self->count($self->step->[$self->cur_step_ind]);
... |
| AI-MXNet-1.4 | AI::MXNet::CudaModule | show |
| method launch(
ArrayRef[AI::MXNet::NDArray|Num] $args,
AI::MXNet::Context $ctx,
CudaKernelShape $grid_dims,
CudaKernelShape $block_dims,
Int $shared_mem=0
)
{
assert(($ctx->device_type eq 'gpu'), "Cuda kernel can only be launche... |
| AI-MXNet-1.4 | AI::MXNet::Profiler | show |
| method profiler_set_config(HashRef[Str] $kwargs)
{
check_call(AI::MXNet::SetProfilerConfig(scalar(keys %{ $kwargs }), $kwargs));
}
method profiler_set_state(Int $state)
{
check_call(AI::MXNet::SetProfilerState($state));
}
method dump_profile()... |
| AI-MXNet-1.4 | AI::MXNet::AutoGrad | show |
| method set_is_training(Bool $is_train)
{
return scalar(check_call(AI::MXNetCAPI::AutogradSetIsTraining($is_train)));
}
method set_is_recording(Bool $is_recording)
{
return scalar(check_call(AI::MXNetCAPI::AutogradSetIsRecording($is_recording)));... |
| AI-MXNet-1.4 | AI::MXNet::RecordIO | show |
| method open()
{
$self->SUPER::open();
$self->idx({});
$self->keys([]);
open(my $f, $self->flag eq 'r' ? '<' : '>', $self->idx_path);
$self->fidx($f);
if(not $self->writable)
{
while(<$f>... |
| AI-MXNet-1.4 | AI::MXNet::TestUtils | show |
| func check_consistency(
SymbolOrArrayOfSymbols :$sym,
ArrayRef :$ctx_list,
Num :$scale=1,
Str|ArrayRef[Str]|HashRef[Str] :$grad_req='write',
Maybe[HashRef[AI:... |
| AI-MXNet-1.4 | AI::MXNet::Engine | show |
| method set_bulk_size(Int $size)
{
return scalar(check_call(AI::MXNetCAPI::EngineSetBulkSize($size)));
}
method bulk(Int $size, CodeRef $sub)
{
my $prev = __PACKAGE__->set_bulk_size($size);
eval { $sub->() };
my $err = $@;
__PA... |
| AI-MXNet-1.4 | AI::MXNet::Visualization | show |
| method render($output=)
{
my $method = 'as_' . $self->format;
return $self->graph->$method($output);
}
1 |
| AI-MXNet-1.4 | AI::MXNet::Random | show |
| method seed(Int $seed_state, Str|AI::MXNet::Context :$ctx='all')
{
if(not ref $ctx)
{
confess("ctx argument could be either string 'all' or AI::MXNet::Context")
unless $ctx eq 'all';
check_call(AI::MXNetCAPI::RandomSeed... |
| AI-MXNet-1.4 | AI::MXNet::Context | show |
| method deepcopy()
{
return __PACKAGE__->new(
device_type => $self->device_type,
device_id => $self->device_id
);
}
$AI::MXNet::current_ctx = __PACKAGE__->new(device_type => 'cpu', device_id =&g... |
| AI-MXNet-1.4 | AI::MXNet::Callback | show |
| method Speedometer(@args)
{
AI::MXNet::Speedometer->new(
@args == 3 ?
(batch_size => $args[0], frequent => $args[1], auto_reset => $args[2])
: @args == 2 ?
(batch_size => $args[0], frequen... |
| AI-MXNet-1.4 | AI::MXNet::RNN | show |
| method save_rnn_checkpoint(
AI::MXNet::RNN::Cell::Base|ArrayRef[AI::MXNet::RNN::Cell::Base] $cells,
Str $prefix,
Int $epoch... |
| AI-MXNet-1.4 | AI::MXNet::Metric | show |
| method create(Metric|ArrayRef[Metric] $metric, @kwargs)
{
Carp::confess("metric must be defined") unless defined $metric;
return $metric if blessed $metric and $metric->isa('AI::MXNet::EvalMetric');
if(my $ref = ref $metric)
{
i... |
| AI-MXNet-1.4 | AI::MXNet::NDArray::Slice | show |
| method set(AcceptableInput $value, $reverse=)
{
confess("set value must be defined") unless defined $value;
confess("${\ $self->parent } is not writable") unless $self->parent->writable;
my $shape = [ map {
my($begin, $end) = ... |
| AI-MXNet-1.4 | AI::MXNet::NDArray::Sparse | show |
| method _check_shape($s1, $s2)
{
my ($ps1, $ps2) = map { (blessed($_) and $_->isa('AI::MXNet:NDArray')) ? pdl($_->shape) : blessed($_) ? $_ : pdl($_) } ($s1, $s2);
return 1 unless defined $s2;
($ps1 == $ps2)->all
or
confess... |
| AI-MXNet-1.4 | AI::MXNet::Gluon::Utils | show |
| method attach(Hash::Ordered $hooks_dict, $hook)
{
assert((not $self->_hooks_dict_ref), 'The same handle cannot be attached twice.');
$self->_id(refaddr($hook));
$hooks_dict->set($self->_id, $hook);
$self->_hooks_dict_ref($ho... |
| AI-MXNet-1.4 | AI::MXNet::Gluon::Parameter | show |
| method get(Str $name, %kwargs)
{
$name = $self->prefix . $name;
my $param = $self->_get_impl($name);
if(not defined $param)
{
$param = AI::MXNet::Gluon::Parameter->new($name, %kwargs);
$self->_params->set($na... |
| AI-MXNet-1.4 | AI::MXNet::Gluon::Trainer | show |
| method python_constructor_arguments()
{
[qw/params optimizer optimizer_params kvstore compression_params update_on_kvstore/]
}
sub BUILD
{
my $self = shift;
my @params;
if(blessed $self->params)
{
@params = $self->params... |
| AI-MXNet-1.4 | AI::MXNet::Gluon::NN::Activation | show |
| method python_constructor_arguments()
{
['beta'];
}
method hybrid_forward(GluonClass $F, GluonInput $x)
{
return return $x * $F->sigmoid($self->beta * $x, name=>'fwd');
}
__PACKAGE__->register('AI::MXNet::Gluon::NN') |
| AI-MXNet-1.4 | AI::MXNet::RNN::Params | show |
| method call(AI::MXNet::Symbol $inputs, SymbolOrArrayOfSymbols $states)
{
my $output;
($output, $states) = $self->base_cell->($inputs, $states);
$output = AI::MXNet::Symbol->elemwise_add($output, $inputs, name => $output->name.'_... |
| AI-MXNet-1.4 | AI::MXNet::RNN::IO | show |
| method reset()
{
$self->curr_idx(0);
@{ $self->idx } = shuffle(@{ $self->idx });
$self->nddata([]);
$self->ndlabel([]);
for my $buck (@{ $self->data })
{
$buck = pdl_shuffle($buck);
my $label = $bu... |
| AI-MXNet-1.4 | AI::MXNet::Symbol::NameManager | show |
| method get(Maybe[Str] $name, Str $hint)
{
$name = $self->SUPER::get($name, $hint);
return $self->prefix . $name;
}
1 |
| AI-MXNet-1.4 | AI::MXNet::Symbol::AttrScope | show |
| method current()
{
$AI::MXNet::curr_attr_scope;
}
method get(Maybe[HashRef[Str]] $attr=)
{
return bless($attr//{}, 'AI::MXNet::Util::Printable') unless %{ $self->attr };
my %ret = (%{ $self->attr }, %{ $attr//{} });
return bless (\... |
| AI-MXNet-1.4 | AI::MXNet::Symbol::Doc | show |
| method get_output_shape(AI::MXNet::Symbol $sym, %input_shapes)
{
my $s_outputs = $sym->infer_shape(%input_shapes);
my %ret;
@ret{ @{ $sym->list_outputs() } } = @$s_outputs;
return bless \%ret, 'AI::MXNet::Util::Printable';
}
func bu... |
| AI-MXNet-1.4 | AI::MXNet::Executor::Group | show |
| method decide_slices(ArrayRef[AI::MXNet::DataDesc] $data_shapes)
{
confess("empty data_shapes array") unless @{ $data_shapes } > 0;
my $major_axis = [map { AI::MXNet::DataDesc->get_batch_axis($_->layout) } @{ $data_shapes }];
for(zip(... |
| AI-MXNet-1.4 | AI::MXNet::BatchEndParam | show |
| method forward_backward(AI::MXNet::DataBatch $data_batch)
{
$self->forward($data_batch, is_train => 1);
$self->backward();
}
method score(
AI::MXNet::DataIter $eval_data,
EvalMetric|ArrayRef[EvalMetric] $eval... |
| AI-MXNet-1.4 | AI::MXNet::Module::Bucketing | show |
| method _reset_bind()
{
$self->binded(0);
$self->_buckets({});
$self->_curr_module(undef);
$self->_curr_bucket_key(undef);
}
method data_names()
{
if($self->binded)
{
return $self->_curr_module->data_na... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::ModelStore | show |
| func short_hash($name)
{
Carp::confess("model $name is not available in model zoo") unless exists $_model_sha1{$name};
return substr($_model_sha1{$name}, 0, 8);
}
method get_model_file(Str $name, Str :$root='~/.mxnet/models')
{
my $file_name... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::Vision::DenseNet | show |
| method get_densenet(
Int $num_layers, Bool :$pretrained=0, :$ctx=AI::MXNet::Context->cpu(),
:$root='~/.mxnet/models',
Int :$bn_size=4,
Num :$dropout=0,
Int :$classes=1000
)
{
my ($num_init_features, $growth_rate, $block_config) ... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::Vision::VGG | show |
| method get_vgg(
Int $num_layers, Bool :$pretrained=0, AI::MXNet::Context :$ctx=AI::MXNet::Context->cpu(),
Str :$root='~/.mxnet/models', Int :$classes=1000, Bool :$batch_norm=0
)
{
my ($layers, $filters) = @{ $vgg_spec{$num_layers} };
my... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::Vision::Inception::V3 | show |
| method inception_v3(
Bool :$pretrained=0, AI::MXNet::Context :$ctx=AI::MXNet::Context->cpu(),
Str :$root='~/.mxnet/models', Int :$classes=1000
)
{
my $net = AI::MXNet::Gluon::ModelZoo::Vision::Inception::V3->new($classes);
if($pretra... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::Vision::AlexNet | show |
| method alexnet(
Bool :$pretrained=0,
AI::MXNet::Context :$ctx=AI::MXNet::Context->cpu(),
Str :$root='~/.mxnet/models',
Int :$classes=1000
)
{
my $net = AI::MXNet::Gluon::ModelZoo::Vision::AlexNet->new($classes);
if($pretraine... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::Vision::ResNet::BasicBlockV1 | show |
| method get_resnet(
Int $version, Int $num_layers, Bool :$pretrained=0,
AI::MXNet::Context :$ctx=AI::MXNet::Context->cpu(),
Str :$root='~/.mxnet/models',
Maybe[Int] :$classes=,
Maybe[Bool] :$thumbnail=
)
{
my ($block_type, $laye... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::Vision::MobileNet::RELU6 | show |
| method get_mobilenet(
Num $multiplier, Bool :$pretrained=0, AI::MXNet::Context :$ctx=AI::MXNet::Context->cpu(),
Str :$root='~/.mxnet/models'
)
{
my $net = AI::MXNet::Gluon::ModelZoo::Vision::MobileNet->new($multiplier);
if($pretraine... |
| AI-MXNet-Gluon-ModelZoo-1.33 | AI::MXNet::Gluon::ModelZoo::Vision::SqueezeNet | show |
| method get_squeezenet(
Str $version, Bool :$pretrained=0, AI::MXNet::Context :$ctx=AI::MXNet::Context->cpu(),
Str :$root='~/.mxnet/models', Int :$classes=1000
)
{
my $net = AI::MXNet::Gluon::ModelZoo::Vision::SqueezeNet->new($version, $c... |
| AI-PredictionClient-0.05 | AI::PredictionClient::Testing::Camel | show |
| $camel_png_b64
= 'iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAYAAACqaXHeAAAOiUlEQVR42u2beYxd
V33HP+ecu7593uz2eBwvsWMnUJI4gQRSoOw0pSJdpEqILkIq0FYUqfxTKrVIrWhV
IRCiVBUSVFVpC5StLKW0FAqBxCFx7IQ48T5jz/pm3v7uu/s5/WNcILXJYjK2ROb3
15Pufef93uee+zvf8/3dK4wxhudxSJ7nsQVgC8Dz... |
| API-Basecamp-0.06 | API::Basecamp | show |
| method PREPARE ($ua, $tx, %args) {
my $headers = $tx->req->headers;
my $url = $tx->req->url;
$headers->header('Content-Type' => 'application/json');
$url->path("@{[$url->path]}.json") if $url->path !~ /\.j... |
| API-Client-0.04 | API::Client | show |
| method AUTOLOAD () {
my @words = split /::/, our $AUTOLOAD;
my $method = pop @words;
my $package = join '::', @words;
Carp::croak("Undefined subroutine &${package}::$method called")
unless Scalar::Util::blessed($self) && $self-... |
| API-Client-0.04 | API::Client::Core | show |
| method DELETE (Str :$path = '', HashRef :$data = {}, HashRef :$query = {}) {
my $ua = $self->user_agent;
my $url = $self->url->clone;
$url->path(join '/', $url->path, $path) if $path;
$url->query($url->query->me... |
| API-Client-0.04 | API::Client::Exception | show |
| method default_message {
my $code = $self->code;
my $method = $self->method;
my $url = $self->url;
my $reason = $code ? "response code $code" : "unexpected response";
my $message = "$reason received while processing th... |
| API-Client-0.04 | API::Client::Credentials | show |
| method process (("InstanceOf['Mojo::Transaction']") $tx) {
return $tx;
}
1 |
| API-Facebook-0.04 | API::Facebook | show |
| method PREPARE ($ua, $tx, %args) {
my $headers = $tx->req->headers;
my $url = $tx->req->url;
$headers->header('Content-Type' => 'application/json');
$url->query->merge(access_token => $self->access_toke... |
| API-Github-0.06 | API::Github | show |
| method PREPARE ($ua, $tx, %args) {
my $headers = $tx->req->headers;
my $url = $tx->req->url;
$headers->header('Content-Type' => 'application/json');
return $self;
}
method resource (@segments) {
my $instance... |
| API-Google-0.12 | API::Google::Server | show |
| app->start |
| API-Name-0.06 | API::Name | show |
| method PREPARE ($ua, $tx, %args) {
my $headers = $tx->req->headers;
my $url = $tx->req->url;
my $user = $self->user;
my $token = $self->token;
$headers->header('Content-Type' => 'application/json');
... |
| API-Stripe-0.07 | API::Stripe | show |
| method BUILD () {
my $identifier = $self->identifier;
my $username = $self->username;
my $version = $self->version;
my $agent = $self->user_agent;
my $url = $self->url;
$agent->transactor->na... |
| API-Trello-0.06 | API::Trello | show |
| method PREPARE ($ua, $tx, %args) {
my $headers = $tx->req->headers;
my $url = $tx->req->url;
$headers->header('Content-Type' => 'application/json');
}
method resource (@segments) {
my $instance = __PACKAGE__->... |
| API-Twitter-0.05 | API::Twitter | show |
| API-Wunderlist-0.06 | API::Wunderlist | show |
| method PREPARE ($ua, $tx, %args) {
my $headers = $tx->req->headers;
my $url = $tx->req->url;
$headers->header('X-Client-ID' => $self->client_id);
$headers->header('X-Access-Token' => $self->access_token)... |
| Acme-1.11111111111 | Acme | show |
| *is_leon_brocard = \&is_acme |
| Acme-Akashic-Records-0.01 | Acme::Akashic::Records | show |
| $records |
| Acme-Beatnik-0.02 | Acme::Beatnik | show |
| FILTER
{ $_ =~ s/[^\w\s]//g;
my @words = split(/\s+/,$_);
for my $word (@words)
{ my $number = 0;
for(split(//,$word))
{ $number += $scrabble{uc $_}; }
push(@numbers,$number);
}
for($ip = 0; $ip <= $#numbers ; $ip++)
{ if (exist... |
| Acme-Bleach-1.150 | Acme::DWIM | show |
| print {0} $pre."use Acme::DWIM;$dwimity\n", dwim $code and exit |
| Acme-Bleach-1.150 | Acme::Morse | show |
| print {0} "use Acme::Morse;\n", encypher $telegram and exit |
| Acme-Bleach-1.150 | Acme::Bleach | show |
| print {0} "${coat}use Acme::Bleach;\n", whiten $pressed.$shirt and exit |
| Acme-Boom-3735928560 | Acme::Boom | show |
| Earth-Shattering-Kaboom-!!1 |
| Acme-Bushisms-0.02 | Acme::Bushisms | show |
| print {0} "use Acme::Bushisms;\n\n$dubya\n", invade $iraq and exit |
| Acme-Canadian-0.03 | Acme::Canadian | show |
| FILTER {
s/, eh\?/;/g; s/aboot/about/;
}
1 |
| Acme-DeepThoughts-0.01 | Acme::DeepThoughts | show |
| print {0} "use Acme::DeepThoughts;\n\n$DeepThought\n", reflect $thought and exit |
| Acme-Eatemup-0.02 | Acme::Eatemup | show |
| *yumyum=*eatemup |
| Acme-Hidek-44.0 | Acme::Hidek::Congrats | show |
| print {$out} "use $package;\n", whiten $shirt |
| Acme-Hodor-1.00 | Acme::Hodor | show |
| print {0} "use Acme::Hodor;\n", encypher $telegram and exit |
| Acme-IAMB-0.02 | Acme::IAMB | show |
| foobar
1 |
| Acme-JAPH-0.03 | Acme::JAPH | show |
| exit |
| Acme-Labs-1.1 | Acme::Labs | show |
| print {0} $1, pinking $plan
and print STDOUT "Fun-fun-silly-willy!\n"
and do {eval brainier $plan or print STDERR $@; exit} |
| Acme-MJD-0.02 | Acme::MJD | show |
| print {0} "use Acme::MJD;\n\n$DeepThought\n", reflect $thought and exit |
| Acme-MetaSyntactic-Themes-Abigail-2013073101 | Acme::MetaSyntactic::moonwalkers | show |
| __PACKAGE__ -> init ({
names => join ' ',
map {s/__+/_/g; $_}
map {Acme::MetaSyntactic::RemoteList::tr_nonword ($_)}
map {Acme::MetaSyntactic::RemoteList::tr_accent ($_)}
map {/^\s+(... |
| Acme-MyFirstModule-APIERRE-0.02 | Acme::MyFirstModule::APIERRE | show |
| print "hello world"
1 |
| Acme-MyFirstModule-JWKEENE-0.02 | Acme::MyFirstModule::JWKEENE | show |
| blow grits
1 |
| Acme-Nothing-0.03 | Acme::Nothing | show |
| () = .0 |
| Acme-OneBit-0.01 | Acme::Onebit | show |
| print {0} "use Acme::OneBit;\n", encode $program and exit |
| Acme-Orange-0.03 | Acme::Orange | show |
| *_closest = \*closest |
| Acme-Postmodern-Perl-0.09 | Acme::Postmodern::Perl | show |
| -1 |
| Acme-Python-0.01 | Acme::Python | show |
| print {0} "use Acme::Python;\n", encode $program and exit |
| Acme-Remote-Strangulation-Protocol-0.03 | Acme::Remote::Strangulation::Protocol | show |
| print {0} "use Acme::Remote::Strangulation::Protocol;\n\n$DeepThought\n", reflect $thought and exit |
| Acme-RunDoc-0.002 | Acme::RunDoc | show |
| __FILE__ |
| Acme-RunDoc-0.002 | icrosoft::Word | show |
| __FILE__ |
| Acme-Schlong-0.001 | Acme::Schlong | show |
| class Acme::Schlong with MooseX::Getopt::Strict {
use 5.010;
use feature 'switch';
use MooseX::StrictConstructor;
use MooseX::AlwaysCoerce;
use MooseX::Types::Moose -all;
use MooseX::Attribute::ENV;
use MooseX::Types::Path::C... |
| Alien-ActiveMQ-0.00005 | Alien::ActiveMQ | show |
| method _output {
my $msg = "@_\n";
return warn($msg);
}
method startup_timeout {
return 300;
}
method get_installed_versions {
my @dirs = $self->_dist_dir->children;
my @versions = ();
foreach my $dir (@dirs) {
... |
| Alien-Ditaa-0.002 | Alien::Ditaa | show |
| method run_ditaa {
my $java = which 'java';
my $out;
run [$java, '-jar', $self->get_jar, @_], \undef, \$out;
my $exit = $? >> 8;
$self->_set_last_run_output($out);
return $exit;
}
__PACKAGE__->meta->make_immutabl... |
| Alt-Data-Frame-ButMore-0.0051 | Data::Frame | show |
| method uniq () {
my %uniq;
my @uniq_ridx;
my @columns = map { $self->column($_) } @{ $self->column_names };
my @columns_isbad = map { $_->badflag ? $_->isbad : undef } @columns;
for my $i ( 0 .. $self->nrow - 1 ) {
... |
| Alt-Data-Frame-ButMore-0.0051 | Data::Frame::Util | show |
| fun ifelse ($test, $yes, $no) {
state $check = Type::Params::compile(
( ColumnLike->plus_coercions(PiddleFromAny) ),
( ( ColumnLike->plus_coercions(PiddleFromAny) ) x 2 )
);
( $test, $yes, $no ) = $check->( $test, $yes... |
| Alt-Data-Frame-ButMore-0.0051 | Data::Frame::Autobox::Array | show |
| method isempty() { @{$self} == 0 }
method uniq() { [ List::AllUtils::uniq(@{$self}) ] }
method set($index, $value) {
$self->[$index] = $value;
}
method repeat($n) {
return [ (@$self) x $n ];
}
method repeat_to_length($l) {
return $sel... |
| Alt-Data-Frame-ButMore-0.0051 | Data::Frame::IO::CSV | show |
| classmethod from_csv ($file, :$header=true, :$sep=",", :$quote='"',
:$na=[qw(NA BAD)], :$col_names=undef, :$row_names=undef,
Map[Str, DataType] :$dtype={},
:$strings_as_factors=false
) {
... |
| Alt-Data-Frame-ButMore-0.0051 | Data::Frame::Partial::Sugar | show |
| method _initialize_sugar() {
my %hash;
tie %hash, qw(Tie::Data::Frame), $self;
$self->_tie_hash( \%hash );
}
1 |
| Alt-Data-Frame-ButMore-0.0051 | Data::Frame::Partial::Eval | show |
| method eval_tidy ($x) {
my $is_quosure = $x->$_DOES('Eval::Quosure');
if (ref($x) and not $is_quosure) {
return $x;
}
my $expr = $is_quosure ? $x->expr : $x;
if ( $self->exists($expr) ) {
return $self->colu... |
| Alt-Data-Frame-ButMore-0.0051 | Data::Frame::Role::Rlike | show |
| method head($n=6) {
my ($start, $stop);
if( $n < 0 ) {
$start = 0;
$stop = $self->number_of_rows + $n - 1;
} else {
$start = 0;
$stop = $n - 1;
}
$start = List::AllUtils::max( 0, $start );
$stop = List::AllUtils::min( $self->numbe... |
| Amazon-MWS-0.150 | Amazon::MWS::Sellers | show |
| define_api_method ListMarketplaceParticipationsByNextToken =>
raw_body => 1,
service => "$sellers_service",
parameters => {
NextToken => {
type => 'string',
required => 1,
},
... |
| Amazon-MWS-0.150 | Amazon::MWS::InboundShipment | show |
| define_api_method CreateInboundShipment =>
version => '2010-10-01',
raw_body => 1,
method => 'POST',
service => "$inbound_service",
parameters => {
ShipmentId => { type => 'string' },
'InboundShipmentHeader.Sh... |
| Antispam-Toolkit-0.08 | Antispam::Toolkit::Types::Internal | show |
| subtype NonNegativeNum,
as Num,
where { $_ >= 0 },
message { "The number you provided ($_) was not greater than or equal to zero" } |
| AnyEvent-Retry-0.03 | AnyEvent::Retry::Interval | show |
| around 'next' => sub {
my ($orig, $self) = @_;
$self->_inc_counter;
my $counter = $self->counter;
my $result = $self->$orig($counter);
return ($result, $self->counter) if wantarray;
return $result;
} |
| AnyEvent-Retry-0.03 | AnyEvent::Retry::Types | show |
| coerce Interval, from HashRef, via {
my $req = [keys %$_]->[0];
my $args = $_->{$req};
my $name = class_name($req);
Class::MOP::load_class($name);
return $name->new($args);
} |
| AnyEvent-Retry-0.03 | AnyEvent::Retry::Interval::API | show |
| requires 'reset' |
| AnyEvent-ZeroMQ-0.01 | AnyEvent::ZeroMQ::Types | show |
| subtype SocketDirection, as Str, where {
/^(r|rw|wr|w|)$/;
}, message { "Socket direction must be r, w, rw, or the empty string; not '$_'" } |
| AnyEvent-ZeroMQ-0.01 | AnyEvent::ZeroMQ::Handle::Role::Generic | show |
| requires 'connect' |
| AnyEvent-ZeroMQ-0.01 | AnyEvent::ZeroMQ::Handle::Role::Readable | show |
| requires 'push_read' |
| AnyEvent-ZeroMQ-0.01 | AnyEvent::ZeroMQ::Handle::Role::Writable | show |
| requires 'push_write' |
| AnyEvent-ZeroMQ-0.01 | AnyEvent::ZeroMQ::Publish::Trait::Topics | show |
| around 'mangle_message' => sub {
my ($orig, $self, $msg, %args) = @_;
my $topic = delete $args{topic};
$msg = "$topic$msg" if defined $topic;
return $self->$orig($msg, %args);
} |
| AnyEvent-ZeroMQ-0.01 | AnyEvent::ZeroMQ::Subscribe::Trait::Topics | show |
| around '_call_callback' => sub {
my ($orig, $self, $cb, @rest) = @_;
$self->$orig( sub {
my ($self, $item, @rest) = @_;
my $tr = $self->topic_regex;
if(my ($topic, $item) = ($item =~ /$tr/)){
$cb->($... |
| AnyEvent-ZeroMQ-0.01 | AnyEvent::ZeroMQ::Role::WithHandle | show |
| role {
my $p = shift;
my $type = $p->socket_type;
my $dir = $p->socket_direction;
has 'context' => (
is => 'ro',
isa => 'ZeroMQ::Raw::Context',
required => 1,
);
has 'con... |
| Apache-Auth-UserDB-v0.120 | Apache::Auth::UserDB | show |
| TRUE |
| Apache-Auth-UserDB-v0.120 | Apache::Auth::User | show |
| TRUE |
| Apache-Auth-UserDB-v0.120 | Apache::Auth::UserDB::File | show |
| TRUE |
| Apache-Auth-UserDB-v0.120 | Apache::Auth::UserDB::File::Digest | show |
| TRUE |
| Apache-Auth-UserDB-v0.120 | Apache::Auth::UserDB::File::Basic | show |
| TRUE |
| Apache-Auth-UserDB-v0.120 | Apache::Auth::User::Digest | show |
| TRUE |
| Apache-Auth-UserDB-v0.120 | Apache::Auth::User::Basic | show |
| TRUE |
| App-Beeminder-Hook-0.003 | App::Beeminder::Hook | show |
| true |
| App-BorgRestore-3.3.0 | App::BorgRestore | show |
| method new($class: $deps = {}) {
$deps->{settings} //= App::BorgRestore::Settings->new();
my $config = $deps->{settings}->get_config();
$deps->{borg} //= App::BorgRestore::Borg->new(@{$config->{borg}}{qw(repo backup_prefix)});
$... |
| App-BorgRestore-3.3.0 | App::BorgRestore::DB | show |
| method new($class: $db_path, $cache_size) {
my $self = {};
bless $self, $class;
if ($db_path =~ /^:/) {
$self->_open_db($db_path);
$self->initialize_db();
} elsif (! -f $db_path) {
path($db_path)->parent->mkpath({mode => oct(700)... |
| App-BorgRestore-3.3.0 | App::BorgRestore::Helper | show |
| fun untaint($data, $regex) {
$data =~ m/^($regex)$/ or die "Failed to untaint: $data";
return $1;
}
fun untaint_archive_name($archive) {
return untaint($archive, qr([a-zA-Z0-9-:+\.]+));
}
fun format_timestamp($timestamp) {
return POSIX::strftime "%a... |
| App-BorgRestore-3.3.0 | App::BorgRestore::Settings | show |
| method new_no_defaults($class: $deps = {}) {
my $self = {};
bless $self, $class;
$self->{deps} = $deps;
if (defined $ENV{XDG_CACHE_HOME} or defined $ENV{HOME}) {
$cache_path_base = sprintf("%s/borg-restore.pl", $ENV{XDG_CACHE_HOME} // $ENV{HOME... |
| App-BorgRestore-3.3.0 | App::BorgRestore::Borg | show |
| method new($class: $borg_repo, $backup_prefix) {
my $self = {};
bless $self, $class;
$self->{borg_repo} = $borg_repo;
$self->{backup_prefix} = $backup_prefix;
$self->{borg_version} = $self->borg_version();
return $self;
}
method bor... |
| App-BorgRestore-3.3.0 | App::BorgRestore::PathTimeTable::DB | show |
| method new($class: $deps = {}) {
return $class->new_no_defaults($deps);
}
method new_no_defaults($class: $deps = {}) {
my $self = {};
bless $self, $class;
$self->{deps} = $deps;
$self->{cache} = {};
$self->{current_path_in_cache} = "";
... |
| App-BorgRestore-3.3.0 | App::BorgRestore::PathTimeTable::Memory | show |
| method new($class: $deps = {}) {
return $class->new_no_defaults($deps);
}
method new_no_defaults($class: $deps = {}) {
my $self = {};
bless $self, $class;
$self->{deps} = $deps;
$self->{lookuptable} = [{}, 0];
$self->{nodes_to_flatten} ... |
| App-Charon-0.001003 | App::Charon | show |
| $App::Charon::VERSION = '0.001003' |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced | show |
| method new_session_id() {
my $c = $self->session_counter + 1;
$self->session_counter($c);
return $c;
}
method init() {
return if $self->_inited();
my $es_self = $self;
my $listener = $self->loop->listen(
service => con... |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::Log | show |
| fun debug(@log) {
return unless config->evalserver->debug;
my ($package, $file, $line, $sub) = caller 0;
print STDERR "[${package}::$sub #$line]: ", @log, "\n";
}
1 |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::Seccomp | show |
| method load_yaml($yaml_file) {
my $input = do {no warnings 'io'; local $/; open(my $fh, "<", $yaml_file) or die "Couldn't load seccomp YAML $yaml_file: $!"; <$fh>};
my $data = do {
local $YAML::XS::LoadBlessed = 0;
local $YAML::XS::... |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::JobManager | show |
| method add_job($eval_obj) {
my $job_fut = $self->loop->new_future();
my $prio = $eval_obj->{priority} // "realtime";
debug "Got job, $prio";
my $job = {future => $job_fut, eval_obj => $eval_obj};
push $self->jobs->... |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::Seccomp::Syscall | show |
| method resolve_syscall($seccomp) {
my @rendered_tests;
my %permuted_on;
my $perm_re = qr/^\s*\{\{\s*(.*)\s*\}\}\s*$/;
for my $test ($self->tests->@* ) {
my ($arg, $operator, $value) = $test->@*;
if ($value =~ $perm_re) {
... |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::Seccomp::Profile | show |
| method get_rules($seccomp) {
my @rules = map {$seccomp->get_profile_rules($_, $self->name)} $self->include->@*;
push @rules, $self->rules->@*;
if ($self->has_rule_generator()) {
my ($class, $method) = ($self->rule_genera... |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::Seccomp::Plugin::ExecWrapper | show |
| method init_plugin($class: $seccomp) {
return;
}
method exec_wrapper_gen($seccomp) {
my @rules;
for my $language (keys config->language->%* ) {
my $lang_conf = config->language->$language;
if ($lang_conf->bin) {
p... |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::Seccomp::Plugin::Constants::POSIX | show |
| method init_plugin($class: $seccomp) {
POSIX::load_imports;
my @consts = grep {/^[A-Z0-9_]+$/} map {;$POSIX::EXPORT_TAGS{$_}->@*} keys %POSIX::EXPORT_TAGS;
for my $name (@consts) {
eval {
no warnings;
my $value = POSIX->can($name)... |
| App-EvalServerAdvanced-0.024 | App::EvalServerAdvanced::Seccomp::Plugin::Constants::LinuxClone | show |
| method init_plugin($class: $seccomp) {
my @names = qw/FILES FS NEWNS VM THREAD SIGHAND SYSVSEM NEWUSER NEWPID NEWUTS NEWIPC NEWNET NEWCGROUP PTRACE VFORK SETTLS PARENT_SETTID CHILD_SETTID CHILD_CLEARTID DETACHED UNTRACED IO/;
for my $name (@names) {
... |
| App-EvalServerAdvanced-ConstantCalc-0.06 | App::EvalServerAdvanced::ConstantCalc | show |
| method new($class: %args) {
my $consts = delete $args{consts};
my $self = $class->SUPER::new(%args);
$self->{_private}{consts} = $consts;
return $self;
}
method consts() {
return $self->{_private}{consts};
}
method parse_upper() {
... |
| App-EvalServerAdvanced-Protocol-0.105 | App::EvalServerAdvanced::Protocol | show |
| method get_contents() {
if ($self->encoding && $self->encoding ne "raw") {
return Encode::decode($self->encoding, $self->contents);
}
return $self->contents;
}
1 |
| App-EventStreamr-0.5 | App::EventStreamr::Sync | show |
| method _build_cmd() {
$self->{status}{$self->{id}}{date} = strftime "%Y-%m-%d", localtime;
$self->{status}{$self->{id}}{record_path} = $self->{config}{record_path};
my %cmd_vars = (
room => $self->{config}{room},
... |
| App-EventStreamr-0.5 | App::EventStreamr::IngestTest | show |
| method _build_cmd() {
return 'ping 127.0.0.1';
}
1 |
| App-EventStreamr-0.5 | App::EventStreamr::Ingest | show |
| method _load_package($device) {
my $pkg = "App::EventStreamr::".$self->backend."::Ingest::".$device->{type};
load $pkg;
$self->_devices->{$device->{id}} = $pkg->new(
device => $device->{device},
id => $device->{... |
| App-EventStreamr-0.5 | App::EventStreamr::Roles::ConfigAPI | show |
| method post_config() {
$self->update_devices();
my $json = to_json($self->_post_data());
my %post_data = (
content => $json,
'content-type' => 'application/json',
'content-length' => length($json),
);
my $post = $self... |
| App-EventStreamr-0.5 | App::EventStreamr::Roles::Logger | show |
| method _build__logger() {
my $this = shift;
my $loggerName = ref($this);
$self->log_config;
Log::Log4perl->init_once(\$self->log_config);
return Log::Log4perl->get_logger($loggerName)
}
1 |
| App-EventStreamr-0.5 | App::EventStreamr::DVswitch::Standby | show |
| method _build_cmd() {
my $command = $self->{config}{commands}{file} ? $self->{config}{commands}{file} : 'dvsource-file -h $host -p $port -l $file';
my %cmd_vars = (
file => $self->{config}{mixer}{loop},
host => $self-&... |
| App-EventStreamr-0.5 | App::EventStreamr::DVswitch::Mixer | show |
| method _build_cmd() {
my $command = $self->{config}{commands}{dvswitch} ? $self->{config}{commands}{dvswitch} : 'dvswitch -h 0.0.0.0 -p $port';
my %cmd_vars = (
port => $self->{config}{mixer}{port},
);
$command =~ s/\$(\w+)... |
| App-EventStreamr-0.5 | App::EventStreamr::Internal::API | show |
| method _run() {
$self->{config}{control}{$self->{id}}{run} = 1;
return 1;
}
method _restart() {
return 0;
}
1 |
| App-EventStreamr-0.5 | App::EventStreamr::Internal::Devmon | show |
| method _run() {
$self->{config}{control}{$self->{id}}{run} = 1;
return 1;
}
method _restart() {
return 0;
}
1 |
| App-Install-0.03 | MyInstall | show |
| MyInstall->permissions("installed/foo.txt" => 0755) |
| App-JESP-0.015 | App::JESP::Driver | show |
| __PACKAGE__->meta()->make_immutable() |
| App-Lingua-BO-Wylie-Transliteration-0.1.0 | App::Lingua::BO::Wylie::Transliteration | show |
| method transliterate($word) {
no strict;
no warnings;
my $output =
$word =~ s( @{[$self->scheme]} )[
my $o;
my $pre //= $+{pre };
my $super //= $+{super };
my $sub //= $+{sub };
my $... |
| App-Mimosa-0.02 | App::Mimosa::Schema::BCS::Result::Mimosa::Job | show |
| __PACKAGE__->add_unique_constraint("mimosa_job_c1", ['sha1'] ) |
| App-Mowyw-v0.8.0 | App::Mowyw::Lexer | show |
| -1 |
| App-Muter-0.003000 | App::Muter | show |
| App::Muter::Registry->instance->register(__PACKAGE__) |
| App-Netdisco-2.042010 | App::Netdisco::JobQueue | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Configuration | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::JobQueue::PostgreSQL | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Util::DeviceAuth | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Util::Statistics | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Util::SNMP | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Backend::Job | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Loader | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Runner | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Power | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Vlan | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::NodeMonitor | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Contact | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Nbtwalk | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Renumber | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Delete | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Graph | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Location | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::ExpireNodes | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Arpwalk | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Macwalk | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::PortControl | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::SetUserToken | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Arpnip | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::PortName | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Psql | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::DumpConfig | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Show | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Stats | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Expire | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Nbtstat | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::DiscoverAll | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Macsuck | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::MakeRancidConf | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Vlan::Core | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Arpnip::Subnets | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Arpnip::Nodes | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::Neighbors | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::VLANs | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::CanonicalIP | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::PortProperties | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::Properties | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::Entities | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::WithNodes | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::Wireless | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::PortPower | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Discover::Neighbors::Routed | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Nbtstat::Core | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Macsuck::WirelessNodes | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Worker::Plugin::Macsuck::Nodes | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Report | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Password | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::AuthN | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::GenericReport | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Statistics | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::PortControl | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Static | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Device | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::AdminTask | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::TypeAhead | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Search | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Inventory | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Search::Node | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Device::Neighbors | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Device::Modules | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Device::Ports | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Device::Vlans | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Report::VlanInventory | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::Report::PortLog | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::TimedOutDevices | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::NodeMonitor | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::JobQueue | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::PseudoDevice | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::PollerPerformance | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::SlowDevices | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::Users | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::Topology | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Web::Plugin::AdminTask::DuplicateDevices | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Transport::SSH | show |
| true |
| App-Netdisco-2.042010 | App::Netdisco::Transport::SNMP | show |
| true |
| App-NetdiscoX-Web-Plugin-GraphLink | App::NetdiscoX::Web::Plugin::GraphLink | show |
| true |
| App-NetdiscoX-Web-Plugin-GraphLinkSwitch_0.1 | App::NetdiscoX::Web::Plugin::GraphLinkSwitch | show |
| true |
| App-NetdiscoX-Web-Plugin-JackLink | App::NetdiscoX::Web::Plugin::JackLink | show |
| true |
| App-NetdiscoX-Web-Plugin-JackReport | App::NetdiscoX::Web::Plugin::JackReport | show |
| true |
| App-NetdiscoX-Web-Plugin-Observium-2.003000 | App::NetdiscoX::Web::Plugin::Observium | show |
| true |
| App-Notifier-Service-0.0701 | App::Notifier::Service | show |
| true |
| App-RPi-EnvUI-0.30 | App::RPi::EnvUI | show |
| true |
| App-RPi-EnvUI-0.30 | App::RPi::EnvUI::DB | show |
| true |
| App-Repo-0.11 | App::Repo::Agent | show |
| printer("$ARGV[0]") |
| App-Rssfilter-0.07 | App::Rssfilter::Rule | show |
| App-Rssfilter-0.07 | App::Rssfilter::FromYaml | show |
| App-Rssfilter-0.07 | App::Rssfilter::Feed | show |
| App-Rssfilter-0.07 | App::Rssfilter::FromHash | show |
| App-Rssfilter-0.07 | App::Rssfilter::Group | show |
| App-Rssfilter-0.07 | App::Rssfilter::Feed::Storage | show |
| App-Rssfilter-0.07 | App::Rssfilter::Cmd::runfromconfig | show |
| App-Rssfilter-0.07 | App::Rssfilter::Match::AbcPreviews | show |
| App-Rssfilter-0.07 | App::Rssfilter::Match::Category | show |
| App-Rssfilter-0.07 | App::Rssfilter::Match::Duplicates | show |
| App-Rssfilter-0.07 | App::Rssfilter::Match::BbcSports | show |
| App-Rssfilter-0.07 | App::Rssfilter::Filter::DeleteItem | show |
| App-Rssfilter-0.07 | App::Rssfilter::Filter::MarkTitle | show |
| App-Skeletor-0.005 | App::Skeletor | show |
| caller(1) ? 1 : run(@ARGV) |
| App-Syndicator-0.0061 | App::Syndicator | show |
| class App::Syndicator with (App::Syndicator::Config,
MooseX::Getopt::Dashes) {
use App::Syndicator::Types qw/File WritableFile UriArray/;
use App::Syndicator::UI;
use App::Syndicator::DB;
our $BASE = "$ENV{HOME}/.syndicator";
ha... |
| App-Templer-1.2 | Templer::Plugin::HTML | show |
| Templer::Plugin::Factory->new()
->register_formatter( "html", "Templer::Plugin::HTML" ) |
| App-Templer-1.2 | Templer::Plugin::RootPath | show |
| Templer::Plugin::Factory->new()->register_plugin("Templer::Plugin::RootPath") |
| App-Templer-1.2 | Templer::Plugin::ShellCommand | show |
| Templer::Plugin::Factory->new()
->register_plugin("Templer::Plugin::ShellCommand") |
| App-Templer-1.2 | Templer::Plugin::SiteMap | show |
| Templer::Plugin::Factory->new()->register_plugin("Templer::Plugin::SiteMap") |
| App-Templer-1.2 | Templer::Plugin::FileGlob | show |
| Templer::Plugin::Factory->new()->register_plugin("Templer::Plugin::FileGlob") |
| App-Templer-1.2 | Templer::Plugin::Dollar | show |
| Templer::Plugin::Factory->new()
->register_filter( "dollar", "Templer::Plugin::Dollar" ) |
| App-Templer-1.2 | Templer::Plugin::Textile | show |
| Templer::Plugin::Factory->new()
->register_formatter( "textile", "Templer::Plugin::Textile" ) |
| App-Templer-1.2 | Templer::Plugin::FileContents | show |
| Templer::Plugin::Factory->new()
->register_plugin("Templer::Plugin::FileContents") |
| App-Templer-1.2 | Templer::Plugin::Perl | show |
| Templer::Plugin::Factory->new()
->register_formatter( "perl", "Templer::Plugin::Perl" ) |
| App-Templer-1.2 | Templer::Plugin::Breadcrumbs | show |
| Templer::Plugin::Factory->new()
->register_plugin("Templer::Plugin::Breadcrumbs") |
| App-Templer-1.2 | Templer::Plugin::Markdown | show |
| Templer::Plugin::Factory->new()
->register_formatter( "markdown", "Templer::Plugin::Markdown" ) |
| App-Templer-1.2 | Templer::Plugin::Redis | show |
| Templer::Plugin::Factory->new()->register_plugin("Templer::Plugin::Redis") |
| App-Templer-1.2 | Templer::Plugin::RSS | show |
| App-Templer-1.2 | Templer::Plugin::Hash | show |
| Templer::Plugin::Factory->new()->register_plugin("Templer::Plugin::Hash") |
| App-Templer-1.2 | Templer::Plugin::TimeStamp | show |
| Templer::Plugin::Factory->new()->register_plugin("Templer::Plugin::TimeStamp") |
| App-Templer-1.2 | Templer::Plugin::Strict | show |
| Templer::Plugin::Factory->new()
->register_filter( "strict", "Templer::Plugin::Strict" ) |
| App-Toodledo-2.19 | App::Toodledo | show |
| method get_session_token ( Str :$app_token?, Str :$user_id? ) {
my $app_id = $self->app_id;
$user_id ||= $self->user_id or $self->log->logdie("No user_id");
$app_token ||= $self->app_token or $self->log->logdie("No app_token... |
| App-Toodledo-2.19 | App::Toodledo::Task | show |
| method set_name( App::Toodledo $todo!, Str $type!, Item $new_string? ) {
my @args;
my $class = "App::Toodledo::\u$type";
eval "require $class";
my @objs;
if ( $can_use_cache )
{
@objs = @{ $cache{$type} };
$self->log->debug( "Usi... |
| App-Toodledo-2.19 | App::Toodledo::TokenCache | show |
| method is_still_good () {
time - $self->creation_time < __PACKAGE__->Max_Token_Life;
}
1 |
| App-Toodledo-2.19 | App::Toodledo::Location | show |
| method add ( App::Toodledo $todo! ) {
my @args = ( name => $self->name );
$self->$_ and push @args, ( $_ => $self->$_ ) for qw(description lat lon);
my $added_ref = $todo->call_func( location => add => { @args } );
$added_r... |
| App-Toodledo-2.19 | App::Toodledo::TaskCache | show |
| method exists () {
-s _cache_filename() or return;
$self->log->debug( "Task cache exists\n" );
}
method fetch () {
$self->log->debug( "Loading from task cache\n" );
%$self = LoadFile( _cache_filename() );
$self->log->debug( "... |
| App-Toodledo-2.19 | App::Toodledo::Folder | show |
| method add ( App::Toodledo $todo! ) {
my @args = ( name => $self->name );
$self->$_ and push @args, ( $_ => $self->$_ ) for qw(private archived ord);
my $added_ref = $todo->call_func( folder => add => { @args } );
$added_re... |
| App-Toodledo-2.19 | App::Toodledo::InternalWrapper | show |
| method delete ( App::Toodledo $todo! ) {
my $id = $self->id;
(my $type = lc ref $self) =~ s/.*://;
my $deleted_ref = $todo->call_func( $type => delete => { id => $id } );
$deleted_ref->[0]{id} == $id or $self->log->logdie("... |
| App-Toodledo-2.19 | App::Toodledo::Notebook | show |
| method add ( App::Toodledo $todo! ) {
my @args = ( name => $self->name );
$self->$_ and push @args, ( $_ => $self->$_ )
for qw(title folder private added text);
my $added_ref = $todo->call_func( notebook => add => { @args... |
| App-Toodledo-2.19 | App::Toodledo::Goal | show |
| method add ( App::Toodledo $todo! ) {
my @args = ( name => $self->name );
$self->$_ and push @args, ( $_ => $self->$_ ) for qw(contributes level);
my $added_ref = $todo->call_func( goal => add => { @args } );
$added_ref->... |
| App-Toodledo-2.19 | App::Toodledo::Context | show |
| method add ( App::Toodledo $todo! ) {
my $added_ref = $todo->call_func( context => add => { name => $self->name } );
$added_ref->[0]{id};
}
1 |
| App-Toodledo-2.19 | App::Toodledo::InfoCache | show |
| method new_from_file ( $class: Str $file! ) {
if ( -r $file && -f $file)
{
my $ref = LoadFile( $file );
my ($password_ref, $app_token_ref, $default_user_id)
= @{$ref}{qw(passwords app_tokens default_user_id)};
my $log = Log::Log4perl... |
| App-assh-1.1.2 | App::assh | show |
| method _build_hosts {
$_ = do { local(@ARGV, $/) = $->ssh_config_file; <>; };
s/\s+/ /g;
my $ret = {};
while (m<Host\s(.+?)\sHostName\s(.+?)\sUser\s(.+?)\s>xg) {
$ret->{$1} = { NAME => $2, USER => $3 }
... |
| App-hopen-0.000010 | Data::Hopen::Toolchain | show |
| false |
| App-local-lib-helper-0.07 | Maker | show |
| __PACKAGE__->run_if_script |
| App-opan-0.003002 | App::opan | show |
| caller() ? app : app->tap(sub { shift->log->level('fatal') })->start |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::NicTarget | show |
| method _action_show { $self->_action_view }
method _action_view {
my $ntarget = $self->recipe->target_nic_per_ml;
$self->create_result(
string => " -> Target nicotine: $ntarget mg/ml"
)
}
method _action_set {
my $newnic = $s... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::Notes | show |
| method _action_show { $self->_action_view }
method _action_view {
my $n = 0;
my $str = " -> notes:\n";
if ($self->recipe->notes->has_any) {
$str .= $self->recipe->notes->map(sub { $n++ .' - '. $_ })->join("\n")
} els... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::NicType | show |
| method _action_show { $self->_action_view }
method _action_view {
my $type = $self->recipe->base_nic_type;
$self->create_result(
string => " -> Nic type: $type"
)
}
method _action_set {
my $new_nic = $self->params->get... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::TargetAmount | show |
| method _action_show { $self->_action_view }
method _action_view {
my $amt = $self->recipe->target_quantity;
$self->create_result(string => " target => $amt ml")
}
method _action_set {
my $new_tgt = $self->params->get(0);
$... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::Pg | show |
| method _action_show { $self->_action_view }
method _action_view {
my $pg = $self->recipe->target_pg;
$self->create_result(
string => " -> PG: $pg %"
)
}
method _action_set {
my $new_pg = $self->params->get(0);
$self-... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::Vg | show |
| method _action_show { $self->_action_view }
method _action_view {
my $vg = $self->recipe->target_vg;
$self->create_result(string => " -> VG: $vg %")
}
method _action_set {
my $new_vg = $self->params->get(0);
$self->thro... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::Recipe | show |
| method _action_show { $self->_action_view }
method _action_view {
my $rset = App::vaporcalc::RecipeResultSet->new(recipe => $self->recipe);
$rset->result;
$self->create_result(resultset => $rset)
}
method _action_save {
my $d... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::Help | show |
| method _action_view { $self->_action_show }
method _action_show {
my $topic = $self->params->get(0);
my $str;
unless ($topic) {
$str = join "\n",
"Commands can be entered as:",
" [ <VERB> <SUBJECT> <PARAM> ... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::NicBase | show |
| method _action_show { $self->_action_view }
method _action_view {
my $nbase = $self->recipe->base_nic_per_ml;
$self->create_result(
string => " -> Nic base: $nbase mg/ml"
)
}
method _action_set {
my $newbase = $self->para... |
| App-vaporcalc-0.005004 | App::vaporcalc::Cmd::Subject::Flavor | show |
| method _action_show { $self->_action_view }
method _action_view {
my $output = "Flavors:\n";
for my $flavor ($self->recipe->flavor_array->all) {
my $pcnt = $flavor->percentage;
my $tag = $flavor->tag;
my $type = $flavor-... |
| App-vaporcalc-0.005004 | App::vaporcalc::Role::Store | show |
| method save ( (Str | Path) $path ) {
my $jseng = JSON::MaybeXS->new(
utf8 => 1,
pretty => 1,
allow_blessed => 1,
convert_blessed => 1,
);
my $json = $jseng->encode($self)
|| confess "Coul... |
| App-vaporcalc-0.005004 | App::vaporcalc::Role::Calc | show |
| method _base_multiplier { 100 / ($self->base_nic_per_ml || return 1) }
method _calc_base_nic_qty {
return 0 unless $self->target_nic_per_ml;
my $rate = $self->target_nic_per_ml / 100;
my $base_amt_ml = $self->target_quantity * $rate;
... |
| App-vaporcalc-0.005004 | App::vaporcalc::Role::UI::ParseCmd | show |
| method parse_cmd (Str $str) {
my ($subj, $verb);
my $params = array;
my @subjs = array(@{ $self->subject_list })
->nsort_by(sub { length })
->reverse
->all;
SUBJ: for my $maybe (@subjs) {
my $idx = index $str, $maybe;
... |
| App-vaporcalc-0.005004 | App::vaporcalc::Role::UI::PrepareCmd | show |
| method prepare_cmd (
Str :$subject,
(Str | Undef) :$verb = undef,
ArrayObj :$params = array(),
RecipeObject :$recipe,
) {
my $fmt_subj = join '', map {; ucfirst } split ' ', lc $subject;
my $mod = $self->cmd_class_prefi... |
| App-vaporcalc-0.005004 | App::vaporcalc::Role::UI::Cmd | show |
| method execute {
App::vaporcalc::Exception->throw(
message => 'Missing verb; no action to perform!'
) unless $self->verb;
my $meth = '_action_'.lc $self->verb;
return $self->$meth if $self->can($meth);
App::vaporcalc::Exce... |
| Archive-SevenZip-0.11 | Archive::7zip | show |
| *Archive::7zip:: = \*Archive::SevenZip:: |
| Archive-SevenZip-0.11 | Archive::SevenZip::API::ArchiveZip | show |
| *add = \&addMember |
| Articulate-0.005 | Articulate::Routes::Login | show |
| post '/logout' => sub {
my ( $self, $request ) = @_;
my $redirect = $request->params->{'redirect'} // '/';
$self->service->process_request( logout => {} );
} |
| Astro-App-Satpass2-0.040 | Astro::App::Satpass2::Locale::C | show |
| {
'+message' => {
},
'+template' => {
az_rng => <<'EOD',
azel => <<'EOD',
azel_rng => <<'EOD',
equatorial => <<'EOD',
equatorial_rng => <<'EOD',
almanac => <<'EOD',
f... |
| Astro-SIMBAD-2.0.0 | Astro::SIMBAD | show |
| $VERSION = '2.0.0'
1 |
| Audio-1.029 | Audio::Play | show |
| bootstrap Audio::Play::
1 |
| Audio-Audacious-0.932 | Audio::Audacious | show |
| method new($class: ) {
my $self = bless {}, $class;
return $self;
}
method current {
my $title = `audtool2 current-song-tuple-data title`;
chomp($title);
my $artist = `audtool2 current-song-tuple-data artist`;
chomp($artist);
... |
| Auth-GoogleAuthenticator-0.03 | Dancer::Auth::GoogleAuthenticator | show |
| true |
| AxKit-App-Gallery-0.5 | AxKit::App::Gallery | show |
| $VERSION = 0.5 |
| BPM-Engine-0.01 | BPM::Engine::Handler::ActivityInstanceHandler | show |
| role BPM::Engine::Handler::ActivityInstanceHandler {
requires 'runner';
use Scalar::Util qw/blessed/;
use BPM::Engine::Exceptions qw/throw_store/;
use aliased 'BPM::Engine::Store::Result::ActivityInstance';
method get_activity_instances (@arg... |
| BPM-Engine-0.01 | BPM::Engine::Handler::ProcessDefinitionHandler | show |
| role BPM::Engine::Handler::ProcessDefinitionHandler {
use BPM::Engine::Types qw/Exception LibXMLDoc UUID/;
use BPM::Engine::Exceptions qw/throw_engine throw_model throw_store/;
method get_packages (@args) {
return $self->schema->resul... |
| BPM-Engine-0.01 | BPM::Engine::Handler::ProcessInstanceHandler | show |
| role BPM::Engine::Handler::ProcessInstanceHandler {
use Scalar::Util qw/blessed/;
use BPM::Engine::Types qw/UUID/;
use BPM::Engine::Exceptions qw/throw_store throw_abstract/;
use aliased 'BPM::Engine::Store::Result::Process';
use aliased 'BPM... |
| Benchmark-Perl-Formance-0.53 | Benchmark::Perl::Formance::Plugin::FibMXDeclare | show |
| class Fib {
method fib(Int $n) {
$n < 2
? 1
: $self->fib($n-1) + $self->fib($n-2);
}
}
sub main
{
my ($options) = @_;
$goal = $options->{fastmode} ? 20 : ... |
| Bencode-1.501 | Bencode | show |
| bdecode( 'i1e' ) |
| Bifcode-1.002 | Bifcode | show |
| decode_bifcode('I1,') |
| Bio-Community-0.001008 | Bio::Community::TaxonomyUtils | show |
| Bio-Community-0.001008 | Bio::Community::Role::Table | show |
| Bio-Community-0.001008 | Bio::Community::Role::PRNG | show |
| Bio-Community-0.001008 | Bio::Community::Role::Locked | show |
| Bio-GFF3-2.0 | Bio::GFF3::LowLevel | show |
| *gff3_unescape = \&URI::Escape::uri_unescape |
| Bio-GMOD-0.028 | Bio::GMOD::Admin::Monitor::blat | show |
| /usr/local/blat/bin/gfServer start localhost 2003 /usr/local/wormbase/blat/*.nib & > /dev/null 2>&1
/usr/local/blat/bin/gfServer start localhost 2004 /usr/local/wormbase/blat/briggsae/files/*.nib & > /dev/null 2>&1
sub new {
my $class = ... |
| Bio-GMOD-Blast-Graph-0.06 | Bio::GMOD::Blast::Graph::MapDefs | show |
| $bucketFourMax = 1.0 |
| Bio-PrimerDesigner-0.07 | Bio::PrimerDesigner::Config | show |
| $Bio::PrimerDesigner::Config = {
%s
} |
| Bio-RNA-RNAaliSplit-v0.11 | Bio::RNA::RNAaliSplit::Subtypes | show |
| coerce 'Bio::RNA::RNAaliSplit::AliIO'
=> from 'HashRef'
=> via { Bio::AlignIO->new( %{ $_ } ) } |
| Bio-ViennaNGS-v0.19.2 | Bio::ViennaNGS::Subtypes | show |
| subtype 'Bio::ViennaNGS::ZeroOrOne',
as 'Int',
where { $_ == 0 or $_ == 1 },
message { "[SUBTYPE ISSUE]: expecting '0' or '1', however ($_) is neither." } |
| Bookmarks-Parser-0.08 | Bookmarks::Bookmark | show |
| Bookmarks::Bookmark->mk_accessors(
qw/created modified visited charset url name
id personal icon description expanded
trash order type/
) |
| Boost-UUID-0.02 | Boost::UUID | show |
| XSLoader::load( 'Boost::UUID', $VERSION ) |
| Bot-Net-0.1.0 | Bot::Net::Bot | show |
| on _stop => run {
call get(SESSION) => bot 'shutdown';
} |
| Broadworks-OCIP-0.08 | Redcentric::Roles::OCIP | show |
| method _build_oci () {
my $args = {};
foreach my $arg (qw[username authhash host port]) {
my $method = 'oci_' . $arg;
$args->{$arg} = $self->$method;
}
$args->{trace} = 1 if ( $self->debug );
return Broadwor... |
| Broadworks-OCIP-0.08 | Broadworks::OCIP::Deprecated | show |
| method GroupCallCenterForcedForwardingModifyRequest17 ($x0, @generic_params) {
return $self->send_command(
'GroupCallCenterForcedForwardingModifyRequest17',
serviceUserId => $x0,
@generic_params
);
}
method GroupCall... |
| Bundle-Everything-0.06 | Bundle::Everything | show |
| $VERSION = '0.06'
1 |
| Bundle-Gnome2-0.12 | Bundle::Gnome2 | show |
| $VERSION = '0.12' |
| Bundle-LWP5_837-0.01 | Bundle::LWP5_837 | show |
| $VERSION='0.01' |
| Bundle-LawMonkey-0.01 | Bundle::LawMonkey | show |
| _END_ |
| Bundle-Markup-0.1 | Bundle::Markup | show |
| $VERSION = '0.1' |
| Bundle-Pugs-SmokeKit-1.00 | Bundle::Pugs::SmokeKit | show |
| -1 |
| Bundle-WebDyne-1.004 | Bundle::WebDyne | show |
| $VERSION='1.001' |
| Bundle-WebDyne-1.004 | WebDyne::Bundle::VERSION | show |
| $VERSION='1.004' |
| Buscador-0.2 | Email::Store::Vote | show |
| Email::Store::Mail->has_many(votes => "Email::Store::Vote") |
| BuzzSaw-0.12.0 | BuzzSaw::DB::Schema::Result::CurrentProcessing | show |
| __PACKAGE__->table('current_processing') |
| C-Blocks-0.42 | examples::libprima | show |
| cshare {
}
1 |
| C-Blocks-0.42 | C::Blocks::StretchyBuffer | show |
| cshare {
static void stb__sbgrowf(pTHX_ void **arr, int increment, int itemsize)
{
int N_items;
int * p;
if (*arr) {
/* If the array was previously allocated, then call for a
* reallocation. */
p = stb__sbraw(*arr);
N_items = stb__... |
| CGI-Application-Structured-Tools-0.015 | ::DB | show |
| __PACKAGE__->loader_options(debug => 1) |
| CGI-Auth-3.00 | AuthCfg | show |
| $authcfg = {
-authdir => 'auth',
-authfields => [
{id => 'user', display => 'User Name', hidden => 0, required => 1},
{id => 'pw', display => 'Password', hidden => 1, required => 1},
],
} |
| CGI-ClientError-0.03 | CGI::ClientError | show |
| $CGI::ClientError::footer="</i><br>
If something is unclear, feel free to contact the
webmaster.\n" |
| CGI-Session-4.48 | CGI::Session::Tutorial | show |
| $CGI::Session::Tutorial::VERSION = '4.43' |
| CGI-WebToolkit-0.08 | CGI::WebToolkit | show |
| sub _
{
my ($self, $phrase, $language) = __parse_args(@_);
return '' unless defined $phrase;
return $phrase
if $self->{'phrasetable'} eq '';
$language = $self->get('language') unless defined $language;
$language = $self->{'defaultlanguag... |
| CIPP-3.0.8 | CIPP | show |
| $VERSION = "3.0.8" |
| CIPP-Doc-2.28 | CIPP::Doc | show |
| $VERSION="2.28" |
| CLI-Driver-0.3 | CLI::Driver | show |
| method get_action (Str :$name!) {
my $actions = $self->get_actions;
foreach my $action (@$actions) {
if ( $action->name eq $name ) {
return $action;
}
}
}
method get_actions (Bool :$want_hashref = 0) {
my @ret = @{ $self->actions }... |
| CLI-Driver-0.3 | CLI::Driver::Action | show |
| method parse (HashRef :$href!) {
if ( $href->{is_deprecated} ) {
my $string = $href->{is_deprecated};
my $bool = 0;
if ( $string =~ /^true$/i or $string == 1 ) {
$bool = 1;
}
$self->is... |
| CLI-Driver-0.3 | CLI::Driver::Option | show |
| method get_signature {
my %sig;
my $val = $self->get_val;
if ( defined $val ) {
$sig{ $self->method_arg } = $val;
}
return %sig;
}
method is_required {
if ($self->required) {
return 1;
} ... |
| CLI-Driver-0.3 | CLI::Driver::CommonRole | show |
| method chdir (Str $dir) {
$self->verbose3("chdir($dir)");
chdir($dir) or confess "failed to chdir to $dir: $!";
}
method die (Str $str) {
chomp $str;
die "[ERROR] $str\n";
}
method fatal (Str $str, Num $frames? = 0) {
chomp $str;
my $caller... |
| CLI-Driver-0.3 | CLI::Driver::Class | show |
| method parse (HashRef :$href!) {
if ( !$href->{name} ) {
$self->warn("failed to find class name");
return 0;
}
else {
$self->name( $href->{name} );
}
my $attr = $self->_parse_attrs( href => $href );
if ( !$attr ) {
re... |
| CLI-Gwrap-0.030 | CLI::Gwrapper::HTTP | show |
| get '/gwrap' => sub {
if (request->is_ajax) {
return parse_ajax;
}
else {
return html;
}
}
sub title {
my ($self, $new) = @_;
if (@_ > 1) {
$self->frame->SetTitle($new);
$self-... |
| CPAN-Digger-0.08 | CPAN::Digger::WWW | show |
| true |
| CSS-SAC-0.08 | CSS::SAC::SelectorList | show |
| *CSS::SAC::SelectorList::item = \&Item |
| CallBackery-0.18.0 | package | show |
| <%= '__END__' %> |
| Carp-Mailer-0.1 | Carp::Mailer | show |
| $SIG{__WARN__} = \&_dispatch_message |
| Catalog-1.02 | Bundle::Catalog | show |
| $VERSION = "1.02"
1 |
| Catalyst-TraitFor-Model-DBIC-Schema-QueryLog-AdoptPlack-0.07 | Maker | show |
| __PACKAGE__->run_if_script |
| CatalystX-Dispatcher-AsGraph-0.03 | CatalystX::Dispatcher::AsGraph | show |
| class CatalystX::Dispatcher::AsGraph {
use Graph::Easy;
with 'MooseX::Getopt';
has [qw/appname output/] => (is => 'ro', isa => 'Str', required => 1);
has graph => (
traits => ['NoGetopt'],
is =>... |
| Chart-GGPlot-0.0005 | Chart::GGPlot | show |
| fun qplot (
:$x, :$y,
:$facets = undef,
Str :$geom = "auto",
:$xlim = undef, :$ylim = undef,
:$title = undef, :$xlab = 'x', :$ylab = 'y',
%rest
) {
my $log_mode = $rest{log} // '';
state $supported_log_modes = ['', 'x', ... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::HasRequiredAes | show |
| classmethod required_aes() { [] }
method check_required_aes($aesthetics) {
my %aesthetics = map { $_ => 1 } @$aesthetics;
my $missing_aes = $self->required_aes->grep(sub { !exists $aesthetics{$_} } );
return if @$missing_aes == 0;
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Guide | show |
| classmethod available_aes () { undef; }
method train ($scale, $aesthetics=undef) {
return $self;
}
classmethod _reverse_df ($df) {
return $df->select_rows( [ reverse( 0 .. $df->nrow - 1 ) ] );
}
1 |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Built | show |
| method layer_data ( $i = 0 ) {
return $self->data->at($i);
}
method layer_prestats_data ( $i = 0 ) {
return $self->prestats_data->at($i);
}
method layer_scales ( $i = 0, $j = 0 ) {
my $layout = $self->layout->layout;
m... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Aes | show |
| classmethod transform_key ($key) {
return ( $base_to_ggplot{$key} // $key );
}
classmethod all_aesthetics () { \@all_aesthetics; }
method keys () { [ sort( @{ $self->SUPER::keys() } ) ]; }
classmethod check_aesthetics ($aes, $n=undef) {
unl... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Geom | show |
| classmethod optional_aes() { [] }
method setup_data ($data, $params) { $data }
sub draw_key { return draw_key_point(@_) }
method handle_na ( $data, $params ) {
return remove_missing(
$data,
na_rm => $params->at('na_rm'),
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Position | show |
| method setup_params($data) { return {}; }
method setup_data ($data, $params) {
$self->check_required_aes($data->names);
return $data;
}
method compute_layer ($data, $params, $layout) {
my $panel_data = $data->at('PANEL');
my $s... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Util | show |
| fun has_groups ($df) {
return undef if ( $df->nrow == 0 );
return ( $df->at('group')->at(0) >= 0 );
}
sub collect_functions_from_package {
my ($package) = @_;
load $package;
my ($caller_package) = caller();
my @fun... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Limits | show |
| fun lims (%pairs) {
my @mapped = pairmap { limits( $a => $b ) } ( %pairs );
return \@mapped;
}
fun xlim (@v) { limits( x => \@v ); }
fun ylim (@v) { limits( y => \@v ); }
fun limits ( $var, $lims ) {
state $check =
Type::Par... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Scale | show |
| method get_limits () {
return pdl( [ 0, 1 ] ) if $self->isempty;
if ( !$self->limits->isempty ) {
my $limits = $self->limits->copy;
return ifelse( $limits->isgood, $limits, $self->range->range );
}
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Global | show |
| method _build_element_tree () {
load Chart::GGPlot::Theme::ElementTree;
return Chart::GGPlot::Theme::ElementTree->default_element_tree();
}
1 |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Theme | show |
| classmethod new ( @rest ) {
my %params = @rest == 1 ? %{ $rest[0] } : @rest;
return $class->_theme(%params);
}
classmethod _theme (:$complete = false, %elements ) {
%elements =
map { $_ => $class->_validate_element( $elements{... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Layout | show |
| classmethod scale_apply ($data, $vars, $method,
Piddle1D $scale_id, ArrayRef $scales) {
return if ( $vars->length == 0 );
return if ( $data->nrow == 0 );
die if ( $scale_id->nbad );
my $n = $scales->l... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Stat | show |
| method setup_data ( $data, $params ) { $data }
method setup_params ( $data, $params ) { $params }
method compute_layer ( $data, $params, $layout ) {
$self->check_required_aes(
[ @{ $data->names }, @{ $params->names } ] );
$data... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Backend | show |
| classmethod build($ggplot) {
state $debug_data = sub {
my ($dataframes, $step) = @_;
$log->debug( "Backend::build : data $step :\n"
. join( "\n", map { $_->string } @$dataframes ) )
if ( $log->is_debug ... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Coord | show |
| method aspect () { return; }
method labels ($panel_params) { $panel_params }
method range ($panel_params) {
return {
x => $panel_params->at('x_range'),
y => $panel_params->at('y_range'),
};
}
method setup_panel_param... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::HasParams | show |
| classmethod _parameters() { [] }
classmethod extra_params() { [qw(na_rm)] }
classmethod parameters( $extra = false ) {
my $args = $class->_parameters;
if ($extra) {
$args = $args->union( $class->extra_params );
}
return... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Facet | show |
| method setup_params ($data, $params) { $params }
method setup_data ($data, $params) { $data }
method init_scales ($layout, $params, :$x_scale=undef, :$y_scale=undef) {
my $scales = {};
if ( defined $x_scale ) {
$scales->{x} = [ ( $x_... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Guides | show |
| method build ($scales, :$layers, :$labels, :$default_mapping=undef, %rest) {
my @gdefs;
for my $scale ($scales->scales->flatten) {
for my $output ( $scale->aesthetics->flatten ) {
my $guide = $self->get_guide($ou... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Util::_Labeling | show |
| fun _simplicity( $q, $Q, $j, $lmin, $lmax, $lstep ) {
my $n = @$Q;
my $i = List::AllUtils::firstidx { $_ == $q } @$Q;
my $v =
( fmod($lmin, $lstep) < $eps || $lstep - fmod( $lmin, $lstep ) < $eps )
&& $lmin <= 0
&... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Util::_Base | show |
| fun range_ (Piddle $p, $na_rm = false, $finite = false) {
if ( !$finite and $na_rm ) {
if ( $p->nbad ) {
return pdl( [ 'nan', 'nan' ] )->setnantobad;
}
}
my $p = $finite ? $p->where( $p->isfinite ) : $p;... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Util::Stats | show |
| fun loess (:$x, :$y, :$weights, :$xseq,
:$span=0.75,
:$se=false, :$level=0.95,
:$degree=undef, :$parametric=undef,
:$drop_square=undef, :$normalize=undef,
:$family=undef) {
load Math::LOESS;
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Backend::Plotly | show |
| classmethod _split_on($class_geom_impl, $data) {
my $aes = $class_geom_impl->split_on;
return [ grep { $data->exists($_) } map { "${_}_raw" } @$aes ];
}
method layer_to_traces ($layer, $data, $prestats_data, $layout, $plot) {
return if ... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Backend::Plotly::Geom | show |
| classmethod make_hovertext ($df, ArrayRef $hover_labels) {
my %seen_hover_aes;
my @hover_assoc = pairmap {
my ( $aes, $var ) = ( $a, $b );
if ( !ref($var) and $seen_hover_aes{$var}++ ) {
();
}
else {
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Backend::Plotly::Util | show |
| fun pt_to_px ($x) { $x / 72 * $dpi }
fun cex_to_px ($x) { pt_to_px( 12 * $x * 0.75 * 0.3 ) }
sub br { '<br />' }
fun to_rgb ($color, $alpha=pdl(1)) {
state $check = Type::Params::compile((Piddle | Str), Piddle);
($color, $alpha) = $check-... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Theme::Defaults | show |
| fun theme_bw (%rest) {
return theme_grey(%rest)->replace(
Chart::GGPlot::Theme->new(
panel_background => element_rect( fill => "white" ),
panel_border => element_rect( color => "grey20" ),
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Theme::ElementTree | show |
| classmethod transform_key ($key) {
return ( $key =~ s/\./_/gr );
}
classmethod el_def ( $type, $inherit = [], $desc = '' ) {
$inherit = Ref::Util::is_arrayref($inherit) ? $inherit : [ $inherit // () ];
return {
type => $typ... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Theme::Functions | show |
| fun update_theme(Theme $old_theme, Theme $new_theme) {
return $new_theme if ($new_theme->complete);
my $new_items = aref_diff($old_theme->names, $new_theme->names);
for my $name (@$new_items) {
$old_theme->set($name, $ggpl... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Theme::Rel | show |
| classmethod new ($x) {
return ( bless \$x, $class );
}
method value () {
return $$self;
}
1 |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Theme::Element::Functions | show |
| fun rel($x) {
return Chart::GGPlot::Theme::Rel->new($x);
}
1 |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Scale::Positional | show |
| method break_positions ($range=$self->get_limits()) {
return $self->map_to_limits( $self->get_breaks($range) );
}
method axis_order () {
my @ord = qw(primary secondary);
if ( $self->position eq 'right' or $self->position eq 'bo... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Scale::SupportsSecondaryAxis | show |
| method sec_name () {
return $self->secondary_axis->$_call_if_can('name');
}
method make_sec_title ($title) {
if ( defined $self->secondary_axis ) {
return $self->secondary_axis->make_title($title);
} else {
retu... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Aes::Functions | show |
| fun _aes ($mapping, $level=$aes_level_default) {
my %params = pairmap {
my $val;
if ( $b->$_DOES('Eval::Quosure') ) {
$val = $b;
}
else {
$val = Eval::Quosure->new( $b . '', $level );
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Range::Functions | show |
| fun continuous_range () {
return Chart::GGPlot::Range::Continuous->new();
}
fun discrete_range () {
return Chart::GGPlot::Range::Discrete->new();
}
1 |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Trans::Functions | show |
| fun _register_trans($trans) {
$trans_registry{ $trans->name } = $trans;
}
fun as_trans($x) {
return $x if ( is_trans($x) );
my $trans = $trans_registry{$x};
unless ($trans) {
die "'$x' is not a transformation";
}
retur... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Labels::Functions | show |
| fun xlab($label) {
return Chart::GGPlot::Labels->new( x => $label );
}
fun ylab($label) {
return Chart::GGPlot::Labels->new( y => $label );
}
fun ggtitle( $title, $subtitle = undef ) {
return Chart::GGPlot::Labels->new(
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Guide::Colorbar | show |
| method train ($scale, $aesthetic=undef) {
if ( @{ $scale->aesthetics->intersect( $self->available_aes ) } == 0 ) {
warn sprintf( "colorbar guide needs appropriate scales: %s",
join( ', ', @{ $self->available_aes } ) );
... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Guide::Legend | show |
| method train ($scale, $aesthetic=undef) {
my $breaks = $scale->get_breaks();
if ($breaks->length == 0 or $breaks->ngood == 0) {
return;
}
my $aes_column_name = $aesthetic // $scale->aesthetics->[0];
my $key = Da... |
| Chart-GGPlot-0.0005 | Chart::GGPlot::Position::Util | show |
| fun collide_setup ($data, $width, $name, $strategy,
$check_width=true, $reverse=false) {
if ( defined $width ) {
unless ( List::AllUtils::all { $data->exists($_) } qw(xmin xmax) ) {
$data->set( 'xmin', $dat... |
| Chart-PNGgraph-1.21 | Chart::PNGgraph | show |
| $Chart::PNGgraph::VERSION |
| Cindy-Apache2-0.09 | Cindy::Apache2::RequestRec | show |
| XSLoader::load('Cindy::Apache2', $Cindy::Apache2::VERSION) |
| ClamAV-Client-0.11 | ClamAV::Config | show |
| TRUE |
| ClamAV-Client-0.11 | ClamAV::Client | show |
| TRUE |
| Class-DBI-Relationship-HasManyOrdered-0.03 | ContentManager::Page | show |
| ContentManager::Page->has_many_ordered(Images => ContentManager::Image => image_id, {order_by => 'position', map => 'pageimages'}) |
| Classic-Perl-0.07 | Classic::Perl | show |
| __THE__=> |
| Convert-Base85-1.02 | Convert::Base85 | show |
| *base85_decode = \&decode |
| Convert-TBX-UTX-0.032 | Convert::TBX::UTX | show |
| _run() unless caller |
| Courier-Filter-v0.200 | Courier::Config | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Message | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Error | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Util | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Logger | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Logger::Syslog | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Logger::File | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Logger::IOHandle | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::SpamAssassin | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::SendCopy | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::ClamAVd | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::MIMEParts | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::FakeDate | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::Envelope | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::SPF | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::Parts | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::DNSBL | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::BlankBody | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::SPFout | show |
| TRUE |
| Courier-Filter-v0.200 | Courier::Filter::Module::Header | show |
| DB-SPEEDYB-0.1 | DB::SPEEDYB | show |
| XSLoader::load( "DB::SPEEDYB", $VERSION ) |
| DBD-ADO-2.99 | Local::DBD::ADO::DSN | show |
| [
{
'Provider' => 'Microsoft.Jet.OLEDB.4.0'
, 'Data Source' => '/data/test.mdb'
}
, {
'Provider' => 'VFPOLEDB'
, 'Data Source' => 'C:/data/test.dbc'
}
, {
'Provider' => 'MSDAORA'
, 'Data Source' => ''
,... |
| DBIx-Class-Migration-0.074 | MusicBase::Schema::MigrationScript | show |
| __PACKAGE__->run_if_script |
| DBIx-Class-Migration-0.074 | DBIx::Class::Migration::Script | show |
| __PACKAGE__->run_if_script |
| DBIx-Class-ResultSet-RecursiveUpdate-0.34 | DBICErrorTest::SyntaxError | show |
| I'm a syntax error! |
| DBIx-Class-ResultSet-WithMetaData-1.001000 | DBIx::Class::ResultSet::WithMetaData | show |
| method display () {
my $rs = $self->search({});
$rs->result_class('DBIx::Class::WithMetaData::Inflator');
my @rows;
foreach my $row_rep ($rs->all) {
my ($row, $row_obj) = @{$row_rep};
if (my $info = $self->row_info_for(id =>... |
| DBIx-Class-ResultSource-MultipleTableInheritance-0.03 | DBIx::Class::ResultSource::MultipleTableInheritance | show |
| method new ($class: @args) {
my $new = $class->next::method(@args);
my $rc = $new->result_class;
if (my $meth = $rc->can('result_source_instance')) {
my $source = $rc->$meth;
if ($source->result_class ne $new->result_class
... |
| DBIx-DataModel-3.0 | DBIx::DataModel::Compatibility::V0 | show |
| *refine = sub {
my ($self, %args) = @_;
$args{-post_bless} = delete $args{-postFetch} if $args{-postFetch};
$self->$orig_refine(%args);
}
1 |
| DBIx-OO-0.0.9 | DBIx::OO | show |
| *quote_field = \&SQL::Abstract::_quote |
| DBIx-PgLink-0.01 | DBIx::PgLink::Connector::Roles::SQLServerProc | show |
| method 'build_procedure' => named(
local_schema => {isa=>'Str', required=>1},
remote_catalog => {isa=>'StrNull'},
remote_schema => {isa=>'StrNull'},
remote_object => {isa=>'Str', required=>1},
local_o... |
| DBIx-Simple-Class-1.009 | My::Groups | show |
| __PACKAGE__->BUILD |
| DB_File-SV18x-kit-0.06 | DB_File::SV18x | show |
| die "DB_File::SV18x is a dummy package without functionality.
Please try DB_File::SV185 or DB_File::SV186, whatever has been
built on your system" |
| DOCSIS-ConfigFile-0.76 | DOCSIS::ConfigFile | show |
| $CONFIG_TREE = {
BaselinePrivacy => {
code => 17,
func => 'nested',
lsize => 1,
limit => [0, 0],
nested => {
AuthGraceTime => {code => 3, func => 'uint', lsize => 1, limit => [1, 60479... |
| DSL-HTML-0.006 | DSL::HTML | show |
| default_export include {
my ( $template, @args ) = @_;
my $caller = caller;
check_nesting('include');
my $tmp =
blessed($template)
? $template
: $caller->DSL_HTML->{$template};
croak "No such template '... |
| DSL-HTML-0.006 | DSL::HTML::STL | show |
| template dl {
my ($class, $keys, $data) = process_args(@_);
tag dl(class => $class) {
for my $key ( @$keys ) {
tag dt { $key }
tag dd { $data->{$key} }
}
}
}
template ol {
my ($class, $it... |
| DSL-HTML-0.006 | DSL::HTML::Tag | show |
| croak "deprecated" |
| Dancer-Layout-Bootstrap-0.04 | Dancer::Layout::Bootstrap | show |
| true |
| Dancer-Plugin-Assets-1.52 | Dancer::Plugin::Assets | show |
| true |
| Dancer-Plugin-Auth-Google-0.07 | Dancer::Plugin::Auth::Google | show |
| register_plugin |
| Dancer-Plugin-Auth-Twitter-0.08 | Dancer::Plugin::Auth::Twitter | show |
| Dancer-Plugin-Authen-Simple-0.130500 | Dancer::Plugin::Authen::Simple | show |
| register_plugin for_versions => [ 1, 2 ] |
| Dancer-Plugin-BeforeRoute-2.0 | Dancer2::Plugin::BeforeRoute | show |
| register_plugin |
| Dancer-Plugin-BeforeRoute-2.0 | Dancer::Plugin::BeforeRoute | show |
| register_plugin |
| Dancer-Plugin-Cache-CHI-1.5.0 | Dancer::Plugin::Cache::CHI | show |
| register_plugin |
| Dancer-Plugin-Captcha-AreYouAHuman-1 | Dancer::Plugin::Captcha::AreYouAHuman | show |
| register_plugin |
| Dancer-Plugin-Cerberus-0.03 | Dancer::Plugin::Cerberus | show |
| true |
| Dancer-Plugin-ElasticModel-0.08 | Dancer::Plugin::ElasticModel | show |
| true |
| Dancer-Plugin-ElasticSearch-0.003 | Dancer::Plugin::ElasticSearch | show |
| true |
| Dancer-Plugin-FakeCGI-0.63 | example_FakeCGI | show |
| dance |
| Dancer-Plugin-FakeCGI-0.63 | example_FakeCGI | show |
| true |
| Dancer-Plugin-Interchange6-0.121 | Dancer::Plugin::Interchange6::Routes::Account | show |
| true |
| Dancer-Plugin-Paginate-1.0.2 | Dancer::Plugin::Paginate | show |
| true |
| Dancer-Plugin-RPC-1.07 | Dancer::Plugin::RPC::RESTRPC | show |
| true |
| Dancer-Plugin-RPC-1.07 | Dancer::Plugin::RPC::XMLRPC | show |
| true |
| Dancer-Plugin-TagHelper-0.01 | tagtest | show |
| true |
| Dancer-Plugin-Tapir-0.05 | Dancer::Plugin::Tapir | show |
| true |
| Dancer-Plugin-Transformator-0.002 | Dancer::Plugin::Transformator | show |
| register_plugin |
| Dancer-Plugin-WindowSession-0.02 | window_session_test | show |
| true |
| Dancer-SearchApp-0.06 | Dancer::SearchApp | show |
| true |
| Dancer-Session-Memcached-JSON-0.005 | Dancer::Session::Memcached::JSON | show |
| method update() {
my $id = $secret
? unsign($self->id, $secret)
: $self->id;
my $data = {
cookie => {
path => setting('session_cookie_path') // '/',
httpOnly => settin... |
| Dancer-Session-Memcached-JSON-0.005 | Dancer::Session::Memcached::JSON::Signature | show |
| fun sign(Str $val, Str $secret) {
my $mac = hmac_sha256_base64($val, $secret);
$mac =~ s/\=+$//;
return "s:$val.$mac";
}
fun unsign(Str $val, Str $secret) {
$val =~ s/^s://;
my ($str, $id) = split /\./, $val;
my $mac = sign($str... |
| Dancer-Session-Redis-JSON-0.001 | Dancer::Session::Redis::JSON | show |
| method update() {
my $id = $secret
? unsign($self->id, $secret)
: $self->id;
my $data = {
cookie => {
path => setting('session_cookie_path') // '/',
httpOnly => setti... |
| Dancer-Session-Redis-JSON-0.001 | Dancer::Session::Redis::JSON::Signature | show |
| fun sign(Str $val, Str $secret) {
my $mac = hmac_sha256_base64($val, $secret);
$mac =~ s/\=+$//;
return "s:$val.$mac";
}
fun unsign(Str $val, Str $secret) {
$val =~ s/^s://;
my ($str, $id) = split /\./, $val;
my $mac = sign($str... |
| Dancer2-0.208001 | package | show |
| true |
| Data-Compare-1.25 | Data::Compare::Plugins::Scalar::Properties | show |
| register() |
| Data-Compare-Plugins-JSON-1.04 | Data::Compare::Plugins::JSON | show |
| [
['JSON::PP::Boolean', \&_compare_object_and_object],
['JSON::PP::Boolean', '', \&_compare_object_and_scalar],
['JSON::XS::Boolean', \&_compare_object_and_object],
['JSON::XS::Boolean', '', \&_compare_object_an... |
| Data-Compare-Plugins-Set-Object-1.001 | Data::Compare::Plugins::Set::Object | show |
| _register() |
| Data-Downloader-0.9907 | Data::Downloader | show |
| <<"=head1 SCHEMA" |
| Data-Fake-0.004 | Data::Fake::Names | show |
| $surname_count = @surnames |
| Data-Fake-0.004 | Data::Fake::Company | show |
| $company_suffix_count = @company_suffix |
| Data-HanConvert-1.5 | Data::HanConvert::tw2cn | show |
| $Data::HanConvert::tw2cn = {"\x{5176}\x{4ed6}" => "\x{5176}\x{5b83}","\x{8f49}\x{6369}\x{9ede}" => "\x{8f6c}\x{6298}\x{70b9}","\x{96fb}\x{5b50}\x{90f5}\x{4ef6}" => "\x{7535}\x{5b50}\x{90ae}\x{7bb1}","\x{5b58}\x{6a94}" => "\x{5b58}\x{76d8}","\x... |
| Data-HanConvert-1.5 | Data::HanConvert::tw2cn_characters | show |
| $Data::HanConvert::tw2cn_characters = {"\x{9203}" => "\x{9498}","\x{8b5c}" => "\x{8c31}","\x{775e}" => "\x{7750}","\x{7e7d}" => "\x{7f24}","\x{9dbc}" => "\x{9e63}","\x{6417}" => "\x{6363}","\x{7044}" => "\x{6ee0}","\x{8b8a}" => "\x... |
| Data-HanConvert-1.5 | Data::HanConvert::cn2tw | show |
| $Data::HanConvert::cn2tw = {"\x{64cd}\x{4f5c}\x{7cfb}\x{7edf}" => "\x{4f5c}\x{696d}\x{7cfb}\x{7d71}","\x{9634}\x{6c89}\x{6c89}" => "\x{9670}\x{6c88}\x{6c88}","\x{83b7}\x{5f97}" => "\x{7372}\x{5f97}","\x{4ee5}\x{592a}\x{7f51}\x{7edc}" => "\x{4e... |
| Data-HanConvert-1.5 | Data::HanConvert::cn2tw_characters | show |
| $Data::HanConvert::cn2tw_characters = {"\x{953f}" => "\x{9384}","\x{9c99}" => "\x{9c60}","\x{7edd}" => "\x{7d55}","\x{4fa0}" => "\x{4fe0}","\x{9eea}" => "\x{9ef2}","\x{6446}" => "\x{64fa}","\x{98d9}" => "\x{98c6}","\x{28c3e}" => "\... |
| Data-Object-Immutable-0.08 | Data::Object::Immutable | show |
| method new ($data) {
$self = Data::Object->new($data);
Readonly::Hash %$self => %$self if UNIVERSAL::isa $self, 'HASH';
Readonly::Array @$self => @$self if UNIVERSAL::isa $self, 'ARRAY';
Readonly::Scalar $$self => $$self i... |
| Data-Object-Prototype-0.06 | Data::Object::Prototype | show |
| method class () {
my $series = $self->series;
my $format = join '::', $series, '%04d';
my $instance = sprintf $format, ++$counter{$series};
my @statement = "package $instance";
my @supers = 'Data::Object::Prototype::Instan... |
| Data-Object-Prototype-0.06 | Data::Object::Prototype::Package | show |
| method attribute (@args) {
my $class = $self->name;
$class->can('has')->(@args);
return;
}
method mixin_base (Str $name) {
my $class = $self->name;
"Moo"->_set_superclasses($class, $name);
"Moo"->_maybe_reset_... |
| Data-SpreadPagination-0.1.2 | Data::SpreadPagination | show |
| Data-Transactional-1.04 | Data::Compare::Plugins::Data::Transactional | show |
| _register() |
| Database-Async-0.009 | Database::Async | show |
| async sub transaction {
my ($self, @args) = @_;
Scalar::Util::weaken(
$self->{transactions}[@{$self->{transactions}}] =
my $txn = Database::Async::Transaction->new(
database => $self,
... |
| Database-Async-0.009 | Database::Async::ORM | show |
| async sub apply_database_changes {
my ($self, $db, @actions) = @_;
my $ddl = $self->ddl_for($db);
for my $ext ($self->extension_list) {
my ($name) = $ext->name;
try {
die 'invalid name for extension: ' . ... |
| DateTimeX-Auto-0.009 | DateTimeX::Auto | show |
| __FILE__ |
| Defaults-Mauke-0.10 | Defaults::Mauke | show |
| method import($class: @args) {
my $caller = caller;
croak qq{"$_" is not exported by the $class module} for @args;
strict->import;
warnings->import;
warnings->unimport(qw[recursion qw]);
utf8->import;
feature-... |
| Devel-CheckOS-1.81 | Devel::AssertOS | show |
| $^O |
| Devel-Dt-0.04 | Devel::Dt | show |
| () = -.0 |
| Devel-IPerl-0.009 | Devel::IPerl::Plugin::DataMedia | show |
| ...
sub image {
Data::Media::Type::Image->new_from_data( @_ );
}
sub audio {
Data::Media::Type::Audio->new_from_data( @_ );
}
sub tex {
Data::Media::Type::Text::TeX->new_from_data( @_ );
}
sub html {
Data::Media::Type::Text::HTML->new... |
| Devel-NYTProf-6.06 | Devel::NYTProf | show |
| init_profiler() |
| Devel-NYTProf-6.06 | Devel::NYTProf::FileHandle | show |
| &$xs(__PACKAGE__, $Devel::NYTProf::Core::VERSION) |
| Devel-TraceSubs-0.02 | Devel::TraceSubs | show |
| $_ ^=~ { module => 'Devel::TraceSubs', author => 'particle' } |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Sym2type | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Util | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Environment | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Omicron | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Kappa | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Upsilon | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::TSub | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Mu | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Io | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::TTerm | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::TRef | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Chi | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Nu | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Zeta | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Rho | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Pv | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Dv | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::TVar | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Eta | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Iv | show |
| TRUE |
| Devel-TypeCheck-1.2 | Devel::TypeCheck::Type::Var | show |
| TRUE |
| Device-AVR-UPDI-0.01 | Device::AVR::UPDI | show |
| async sub nvmctrl_command
{
my $self = shift;
my ( $cmd ) = @_;
await $self->sts8( $self->{partinfo}->baseaddr_nvmctrl + NVMCTRL_CTRLA, $cmd );
}
async sub await_nvm_not_busy
{
my $self = shift;
my $timeout = 50;
while( --$ti... |
| Device-Chip-HTU21D-0.03 | Device::Chip::HTU21D | show |
| async sub read_config
{
my $self = shift;
my %config = unpack_REG_USER(
await $self->protocol->write_then_read( pack( "C", CMD_READ_REG ), 1 )
);
my $res = ( delete $config{RES0} ) | ( delete $config{RES1} ) << 1;
$confi... |
| Device-Chip-MPL3115A2-0.06 | Device::Chip::MPL3115A2 | show |
| async sub check_id
{
my $self = shift;
my $val = await $self->read_reg( REG_WHO_AM_I, 1 );
my $id = unpack "C", $val;
$id == WHO_AM_I_ID or
die sprintf "Incorrect response from WHO_AM_I register (got %02X, expected %02X)\n",
... |
| Device-Chip-TSL256x-0.02 | Device::Chip::TSL256x | show |
| async sub read_lux
{
my $self = shift;
my ( $data0, $data1, $config ) = await Future->needs_all(
$self->read_data,
$self->read_config,
);
my $gain = $config->{GAIN};
my $msec = $INTEG_to_msec{ $config->{INTEG} }... |
| Dist-Zilla-MintingProfile-MooseXDeclare-0.200 | package | show |
| class {{ $name }}::Command extends (MooseX::App::Cmd::Command, {{ $name }})
with MooseX::Getopt::Dashes with MooseX::Log::Log4perl {
use metaclass 'MooseX::MetaDescription::Meta::Class';
use MooseX::Types::Moose -all;
has global => (
... |
| Dist-Zilla-Plugin-AutoPrereqsFast-0.003 | DZPA::Main | show |
| print qw{
use !!
} |
| Dist-Zilla-Plugin-ChangeStats-Git-0.6.0 | Dist::Zilla::Role::Author::YANICK::RequireZillaRole | show |
| role {
my $p = shift;
sub BUILD {}
after BUILD => sub {
my $self = shift;
my $zilla = $self->zilla;
$zilla->meta->make_mutable;
for my $role ( @{ $p->roles } ) {
$role =~ s/^\+/... |
| Dist-Zilla-PluginBundle-Author-DBR-1.2.5 | Dist::Zilla::PluginBundle::Author::DBR | show |
| class Dist::Zilla::PluginBundle::Author::DBR
with Dist::Zilla::Role::PluginBundle::Merged
{
method configure {
$self->add_bundle(
Filter => {
-bundle => '@Classic',
-remove => [qw/PodVe... |
| Dist-Zilla-PluginBundle-Author-WOLVERIAN-v0.0.8 | Dist::Zilla::PluginBundle::Author::WOLVERIAN | show |
| class Dist::Zilla::PluginBundle::Author::WOLVERIAN
with Dist::Zilla::Role::PluginBundle::Easy {
use Moose::Autobox;
use Dist::Zilla::Plugin::ModuleBuild;
use Dist::Zilla::Plugin::AutoPrereqs;
use Dist::Zilla::Plugin::MinimumPerl;
... |
| Dist-Zilla-PluginBundle-DBR-0.024 | Dist::Zilla::PluginBundle::DBR | show |
| class Dist::Zilla::PluginBundle::DBR with Dist::Zilla::Role::PluginBundle::Easy {
use Dist::Zilla::PluginBundle::Filter;
method configure {
$self->add_bundle(
Filter => {
-bundle => '@Classic',
... |
| Dist-Zilla-PluginBundle-WOLVERIAN-v0.0.7 | Dist::Zilla::PluginBundle::WOLVERIAN | show |
| class Dist::Zilla::PluginBundle::WOLVERIAN
with Dist::Zilla::Role::PluginBundle::Easy {
use Dist::Zilla::Plugin::ModuleBuild;
use Dist::Zilla::Plugin::AutoPrereqs;
use Dist::Zilla::Plugin::MinimumPerl;
use Dist::Zilla::Plugin::MetaJSO... |
| DocSet-0.19 | DocSet | show |
| $VERSION = '0.19' |
| Docserver-1.12 | Docserver::Config | show |
| %Docserver::Config::Config =
(
'port' => 5455,
'clients' => [
{
'mask' => '^127\.0\.0\.1$',
'accept' => 1,
},
{
'mask' => '\.fi\.muni\.cz$',
'accept' => 1,
},
],
'tmp_dir' => 'C:\\tmp\... |
| Document-Maker-0.022 | Document::Maker::Role::Logging | show |
| *log = \&logger |
| Doodle-0.05 | Doodle | show |
| fun new_commands($self) {
return do('array', []);
}
method table(Str $name, Any %args) {
$args{doodle} = $self;
my $table = Doodle::Table->new(%args, name => $name);
return $table;
}
method schema(Str $name, Any %args) {
$args{doodle}... |
| Doodle-0.05 | Doodle::Grammar | show |
| method exception(Str $msg) {
my $engine = ucfirst $self->name;
confess sprintf "[%s] %s", $engine, ucfirst $msg;
}
method execute(Command $cmd) {
my $sub = $cmd->name;
my $sql = $self->$sub($cmd);
my $statement = Doodle::Statement-&g... |
| Doodle-0.05 | Doodle::Helpers | show |
| method schema_create(Any %args) {
$args{doodle} = $self;
my $command = Doodle::Command->new(%args, name => 'create_schema');
$self->commands->push($command);
return $command;
}
method schema_delete(Any %args) {
$args{doodle} = $s... |
| Doodle-0.05 | Doodle::Schema | show |
| fun new_data($self) {
return do('hash', {});
}
method table(Str $name, Any %args) {
$args{doodle} = $self->doodle;
my $table = Doodle::Table->new(%args, name => $name);
return $table;
}
method create(Any %args) {
$args{schema} = $s... |
| Doodle-0.05 | Doodle::Index | show |
| fun new_data($self) {
return do('hash', {});
}
fun new_name($self) {
my @parts;
my $table = $self->table;
my $columns = $self->columns;
push @parts, $table->name;
push @parts, @{$columns};
return join '_', 'indx', @parts;
}
me... |
| Doodle-0.05 | Doodle::Table | show |
| fun new_data($self) {
return do('hash', {});
}
fun new_columns($self) {
return do('array', []);
}
fun new_indices($self) {
return do('array', []);
}
fun new_relations($self) {
return do('array', []);
}
method column(Str $name, Any %args) {
... |
| Doodle-0.05 | Doodle::Command | show |
| method BUILDARGS(%args) {
my $data = {};
my @names = qw(
name
doodle
schema
table
columns
indices
relation
);
for my $name (@names) {
$data->{$name} = delete $args{$name} if exists $args{$name};
}
$data-&g... |
| Doodle-0.05 | Doodle::Column | show |
| fun new_data($self) {
return do('hash', {});
}
method doodle() {
my $doodle = $self->table->doodle;
return $doodle;
}
method create(Any %args) {
my $table = $self->table;
$args{table} = $table;
$args{schema} = $table->schema i... |
| Doodle-0.05 | Doodle::Migration | show |
| method down(Doodle $d) {
confess("This method is meant to be overwritten by the subclass");
}
method migrate(Str $updn, Str $grammar, CodeRef $callback) {
my $results = [];
my $statements = $self->statements($grammar);
$statements = [revers... |
| Doodle-0.05 | Doodle::Relation | show |
| fun new_data($self) {
return do('hash', {});
}
fun new_name($self) {
my @parts;
my $table = $self->table;
my $column = $self->column;
my $ftable = $self->foreign_table;
my $fcolumn = $self->foreign_column;
push @parts, $table-... |
| Doodle-0.05 | Doodle::Schema::Helpers | show |
| method if_exists() {
$self->data->{if_exists} = 1;
return $self;
}
method if_not_exists() {
$self->data->{if_not_exists} = 1;
return $self;
}
1 |
| Doodle-0.05 | Doodle::Grammar::Mysql | show |
| method wrap(Str $arg) {
return '`'. $arg .'`';
}
method type_binary(Column $col) {
return 'blob';
}
method type_boolean(Column $col) {
return 'tinyint(1)';
}
method type_char(Column $col) {
my $size = $col->data->{size} || 1;
return... |
| Doodle-0.05 | Doodle::Grammar::Postgres | show |
| method wrap(Str $arg) {
return '"'. $arg .'"';
}
method type_binary(Column $col) {
return 'bytea';
}
method type_boolean(Column $col) {
return 'boolean';
}
method type_char(Column $col) {
my $size = $col->data->{size} || 1;
return "... |
| Doodle-0.05 | Doodle::Grammar::Mssql | show |
| method wrap(Str $arg) {
return '['. $arg .']';
}
method type_binary(Column $col) {
return 'varbinary(max)';
}
method type_boolean(Column $col) {
return 'bit';
}
method type_char(Column $col) {
my $size = $col->data->{size} || 1;
ret... |
| Doodle-0.05 | Doodle::Grammar::Sqlite | show |
| method wrap(Str $arg) {
return '"'. $arg .'"';
}
method type_binary(Column $col) {
return 'blob';
}
method type_boolean(Column $col) {
return 'tinyint(1)';
}
method type_char(Column $col) {
return 'varchar';
}
method type_date(Column $col) ... |
| Doodle-0.05 | Doodle::Column::Helpers | show |
| method binary(Any %args) {
$self->type('binary');
$self->data->set(%args) if %args;
return $self;
}
method boolean(Any %args) {
$self->type('boolean');
$self->data->set(%args) if %args;
return $self;
}
method char(Any %... |
| Doodle-0.05 | Doodle::Relation::Helpers | show |
| method on_delete(Str $action) {
$self->data->{on_delete} = $action;
return $self;
}
method on_update(Str $action) {
$self->data->{on_update} = $action;
return $self;
}
1 |
| Doodle-0.05 | Doodle::Table::Helpers | show |
| method binary(Str $name, Any %args) {
my $column = $self->column($name);
$column->binary(%args);
return $column;
}
method boolean(Str $name, Any %args) {
my $column = $self->column($name);
$column->boolean(%args);
return $colu... |
| Dwimmer-0.32 | Dwimmer | show |
| true |
| Dwimmer-0.32 | Dwimmer::Admin | show |
| true |
| ETLp-0.04 | ETLp | show |
| class ETLp with ETLp::Role::Config {
use FindBin qw($Bin);
use Config::General qw(ParseConfig);
use ETLp::Exception;
use Try::Tiny;
use Modern::Perl;
use ETLp::Config;
use ETLp::Schema;
use ETLp::Audit::Job;
use ETLp::I... |
| ETLp-0.04 | ETLp::Config | show |
| class ETLp::Config {
use MooseX::Singleton;
has 'dbh' => (is => 'rw', isa => 'DBI::db');
has 'logger' => (is => 'rw', isa => 'Log::Log4perl::Logger');
has 'schema' => (is => 'rw', isa => 'ETLp::Schema');
h... |
| ETLp-0.04 | ETLp::Exception | show |
| class ETLp::Exception {
use Exception::Class (
'ETLpException'
);
} |
| ETLp-0.04 | ETLp::Plugin | show |
| class ETLp::Plugin with ETLp::Role::Config {
use ETLp::Exception;
has 'config' => (is => 'ro', isa => 'HashRef', required => 1);
has 'item' => (is => 'ro', isa => 'HashRef', required => 1);
has ... |
| ETLp-0.04 | ETLp::Types | show |
| class ETLp::Types {
use Moose::Util::TypeConstraints;
class_type('DateTime');
class_type('ETLp::Schema::Result::EtlpJob');
class_type('ETLp::Schema::Result::EtlpItem');
class_type('ETLp::Schema::Result::EtlpFileProcess');
sub... |
| ETLp-0.04 | ETLp::ItemBuilder | show |
| class ETLp::ItemBuilder with ETLp::Role::Config {
use ETLp::Exception;
use Data::Dumper;
use UNIVERSAL::require;
use Try::Tiny;
use Clone qw(clone);
use File::Basename;
has 'plugins' => (is => 'ro', isa => 'Hash... |
| ETLp-0.04 | ETLp::Utility::Command | show |
| class ETLp::Utility::Command {
use Data::Dumper;
use IPC::Cmd;
use Exception::Class ('CommandError');
has 'errstr' => (is => 'rw', isa => 'Str', required => 0, default => '');
has 'time_out' => (is => 'rw', ... |
| ETLp-0.04 | ETLp::Loader::OracleSQLLoader | show |
| class ETLp::Loader::OracleSQLLoader with ETLp::Role::Config {
use ETLp::Exception;
use ETLp::Types;
has 'userid' => (is => 'ro', isa => 'Str', required => 1);
has 'controlfile' => (is => 'ro', isa =&g... |
| ETLp-0.04 | ETLp::Loader::CSV | show |
| class ETLp::Loader::CSV with ETLp::Role::Config {
use ETLp::File::Read::CSV;
use Data::Dumper;
use File::Basename;
use Convert::NLS_DATE_FORMAT qw(posix2oracle);
use DBI::Const::GetInfoType;
use ETLp::Exception;
use Try::T... |
| ETLp-0.04 | ETLp::Audit::Item | show |
| class ETLp::Audit::Item with (ETLp::Role::Config, ETLp::Role::Schema,
ETLp::Role::Audit) {
use DateTime;
use Try::Tiny;
use ETLp::Types;
use ETLp::Audit::FileProcess;
use DateTime;
has 'job' =&g... |
| ETLp-0.04 | ETLp::Audit::Job | show |
| class ETLp::Audit::Job with (ETLp::Role::Config, ETLp::Role::Schema,
ETLp::Role::Audit) {
use Try::Tiny;
use DateTime;
use ETLp::Types;
use ETLp::Audit::Item;
has 'session_id' => (is => 'rw'... |
| ETLp-0.04 | ETLp::Audit::Browser::Model::FileProcess | show |
| class ETLp::Audit::Browser::Model::FileProcess with
(ETLp::Role::Config, ETLp::Role::Schema, ETLp::Role::Audit,
ETLp::Role::Browser) {
method get_file_processes(Maybe[Int] :$page?, Maybe[Int] :$item_id?, Maybe[Int] :$file_id?) {
... |
| ETLp-0.04 | ETLp::Audit::Browser::Model::Item | show |
| class ETLp::Audit::Browser::Model::Item with
(ETLp::Role::Config, ETLp::Role::Schema, ETLp::Role::Audit,
ETLp::Role::Browser) {
use Data::Dumper
method get_items (Maybe[Int] :$page?, Maybe[Int] :$item_id?, Maybe[Int] :$... |
| ETLp-0.04 | ETLp::Audit::Browser::Model::Schedule | show |
| class ETLp::Audit::Browser::Model::Schedule with
(ETLp::Role::Config, ETLp::Role::Schema, ETLp::Role::Audit,
ETLp::Role::Browser) {
use Data::Dumper;
use Try::Tiny;
use Text::Wrapper;
use Config::General qw(ParseConfi... |
| ETLp-0.04 | ETLp::Audit::Browser::Model::Job | show |
| class ETLp::Audit::Browser::Model::Job with
(ETLp::Role::Config, ETLp::Role::Schema, ETLp::Role::Audit,
ETLp::Role::Browser) {
use DateTime;
use DateTime::Format::Strptime;
method get_jobs(Maybe[Int] :$page?, Maybe[Str] :$section... |
| ETLp-0.04 | ETLp::Audit::Browser::Model::User | show |
| class ETLp::Audit::Browser::Model::User with(ETLp::Role::Config, ETLp::Role::Schema, ETLp::Role::Audit, ETLp::Role::Browser) {
use Crypt::PasswdMD5 'unix_md5_crypt';
use Data::Dumper;
method get_user_by_username(Str $user... |
| ETLp-0.04 | ETLp::Execute::Serial | show |
| class ETLp::Execute::Serial with ETLp::Role::Config {
use Try::Tiny;
use Carp;
use ETLp::Exception;
use Data::Dumper;
has 'pipeline' => (is => 'ro', isa => 'ArrayRef', required => 1);
has 'config' => (is =>... |
| ETLp-0.04 | ETLp::Execute::Iteration | show |
| class ETLp::Execute::Iteration with ETLp::Role::Config {
use Try::Tiny;
use Data::Dumper;
use File::LocalizeNewlines;
use File::Basename;
use File::Copy;
use Carp;
use ETLp::Exception;
has 'pipeline' => (is => 'r... |
| ETLp-0.04 | ETLp::Role::Schema | show |
| role ETLp::Role::Schema {
use ETLp::Config;
method schema {
return ETLp::Config->schema;
}
method EtlpAppConfig {
return $self->schema->resultset('EtlpAppConfig');
}
method EtlpConfigura... |
| ETLp-0.04 | ETLp::File::Validate | show |
| class ETLp::File::Validate {
use Time::Piece;
use ETLp::Exception;
use ETLp::File::Config;
has 'data_directory' => (is => 'ro', isa => 'Str');
has 'file_config_directory' => (is => 'ro', isa => 'Str');
has... |
| ETLp-0.04 | ETLp::File::Config | show |
| class ETLp::File::Config with ETLp::Role::Config {
use Text::CSV;
use ETLp::Exception;
use Data::Dumper;
has 'directory' => (is => 'ro', isa => 'Str', required => 0);
has 'definition' => (is => 'ro', isa => ... |
| ETLp-0.04 | ETLp::File::Read | show |
| class ETLp::File::Read with ETLp::Role::Config {
use ETLp::Exception;
use File::LocalizeNewlines;
has 'filename' => (is => 'ro', isa => 'Str', required => 1);
has 'directory' => (is => 'ro', isa => 'Str', required =... |
| ETLp-0.04 | ETLp::File::Watch | show |
| class ETLp::File::Watch with ETLp::Role::Config {
use Moose;
use DateTime;
use FindBin qw($Bin);
use Fcntl ':flock';
use ETLp::Utility::Command;
use ETLp::Types;
use ETLp::Exception;
use Try::Tiny;
has 'directory' =... |
| ETLp-0.04 | ETLp::Plugin::Iterative::PLSQL | show |
| class ETLp::Plugin::Iterative::SteadyStateCheck extends ETLp::Plugin {
sub type {
return 'steady_state_check';
}
method run (Str $filename) {
my $interval = $self->item->{interval} || 5;
my $curr_size =... |
| ETLp-0.04 | ETLp::Plugin::Iterative::Validate | show |
| class ETLp::Plugin::Iterative::Validate extends ETLp::Plugin {
use Try::Tiny;
use ETLp::File::Validate;
use File::Basename;
use Mail::Sendmail;
use Data::Dumper;
sub type {
return 'validate';
}
method run ... |
| ETLp-0.04 | ETLp::Plugin::Iterative::CSVLoader | show |
| class ETLp::Plugin::Iterative::CSVLoader extends ETLp::Plugin {
use ETLp::File::Config;
use File::Copy;
use Try::Tiny;
use File::Basename;
use ETLp::Loader::CSV;
sub type {
return 'csv_loader';
}
method run(Str $f... |
| ETLp-0.04 | ETLp::Plugin::Iterative::OracleSQLLoader | show |
| class ETLp::Plugin::Iterative::OracleSQLLoader extends ETLp::Plugin {
use ETLp::Loader::OracleSQLLoader;
use Try::Tiny;
use File::Basename;
use DBI::Const::GetInfoType;
use File::Copy;
sub type {
return 'sql_loader';
... |
| ETLp-0.04 | ETLp::Plugin::Iterative::PLSQL | show |
| class ETLp::Plugin::Iterative::PLSQL extends ETLp::Plugin {
use DBI;
use Data::Dumper;
use Try::Tiny;
method _parse_params (HashRef $config, ArrayRef $params, Str $filename) {
my $parsed_params;
return $parse... |
| ETLp-0.04 | ETLp::Plugin::Iterative::OS | show |
| class ETLp::Plugin::Iterative::OS extends ETLp::Plugin {
use File::Basename;
use ETLp::Utility::Command;
use Data::Dumper;
sub type {
return 'os';
}
method run(Str $filename) {
my $item = $self->item;
... |
| ETLp-0.04 | ETLp::Plugin::Iterative::Gunzip | show |
| class ETLp::Plugin::Iterative::Gunzip extends ETLp::Plugin {
use IO::Uncompress::Gunzip qw($GunzipError);
sub type {
return 'gunzip';
}
method run (Str $filename) {
my $file_process = $self->audit->item-&g... |
| ETLp-0.04 | ETLp::Plugin::Iterative::Perl | show |
| class ETLp::Plugin::Iterative::Perl extends ETLp::Plugin {
use File::Basename;
use UNIVERSAL::require;
use Try::Tiny;
sub type {
return 'perl';
}
method run (Str $filename) {
my $item = $self->item;
... |
| ETLp-0.04 | ETLp::Plugin::Iterative::Gzip | show |
| class ETLp::Plugin::Iterative::Gzip extends ETLp::Plugin {
use IO::Compress::Gzip qw($GzipError);
sub type {
return 'gzip';
}
method run (Str $filename) {
my $file_process = $self->audit->item->file_pro... |
| ETLp-0.04 | ETLp::Plugin::Serial::Perl | show |
| class ETLp::Plugin::Serial::PLSQL extends ETLp::Plugin::Iterative::PLSQL {
sub type {
return 'plsql';
}
} |
| ETLp-0.04 | ETLp::Plugin::Iterative::OS | show |
| class ETLp::Plugin::Serial::OS extends ETLp::Plugin {
use Data::Dumper;
sub type {
return 'os';
}
method run {
my $item = $self->item;
my $command = $item->{command};
my $timeout = $item-&... |
| ETLp-0.04 | ETLp::Plugin::Serial::Perl | show |
| class ETLp::Plugin::Serial::Perl extends ETLp::Plugin {
use autodie;
use UNIVERSAL::require;
use Try::Tiny;
sub type {
return 'perl';
}
method run {
my $item = $self->item;
my $package = $item-... |
| ETLp-0.04 | ETLp::Plugin::Serial::Watch | show |
| class ETLp::Plugin::Serial::Watch extends ETLp::Plugin {
use ETLp::File::Watch;
use Data::Dumper;
sub type {
return 'watch';
}
method run {
my $item = $self->item;
my $directory = $self->config-&... |
| EekBoek-2.030.1 | EB::Version | show |
| print "$VERSION
" unless caller |
| Eixo-Docker-1.211 | Eixo::Docker::HostConfig | show |
| has(
Binds => [],
PortBindings => {},
BlkioWeight => 0,
CapAdd => undef,
CapDrop => undef,
ContainerIDFile => "",
CpusetCpus => "",
CpusetMems =>"",
CpuShares => 0,
CpuPeriod => 100000,... |
| Eixo-Docker-1.211 | Eixo::Docker::ContainerResume | show |
| has(
Id => '',
Names => [],
Image => '',
Command => '',
Created => 0,
Status => '',
Ports => [],
Labels => {},
SizeRw => 0,
SizeRootFs => 0,
) |
| Eixo-Docker-1.211 | Eixo::Docker::ImageCommit | show |
| has(
Tags => [],
Id => undef,
Created=>undef,
CreatedBy=>undef,
Size=>undef,
) |
| Eixo-Queue-0.5.7 | Eixo::Queue::JobRabbit | show |
| has(
) |
| Email-FolderType-Net-1.043 | Email::FolderType::Net | show |
| *match = Email::FolderType::Net::_create_match(qw[pops pop3s]) |
| Evented-API-Engine-4.11 | Evented::API::Methods | show |
| $mod |
| Exobrain-1.08 | Exobrain::Router | show |
| method start() {
if (not $self->server) {
croak "Attempt to start non-server.";
}
my $zmq = ZMQ::Context->new;
my $sub = $zmq->socket(ZMQ_SUB);
$sub->bind($self->publisher);
$sub->setsockopt(ZMQ_SUBSCRI... |
| Exobrain-1.08 | Exobrain::Agent | show |
| method _build_json() {
eval "use JSON::Any; 1;" or die $@;
return JSON::Any->new;
}
1 |
| Exobrain-1.08 | Exobrain::Bus | show |
| method get() {
my $message = Exobrain::Message::Raw->new( [
map { $_->data } $self->_socket->recv_multipart
] );
if ($self->exobrain) {
$message->exobrain($self->exobrain);
}
return $message;
}
m... |
| Exobrain-1.08 | Exobrain::Measurement::Mailbox | show |
| method _build_summary() {
return join(" ",
$self->user, '@', $self->server, "/", $self->mailbox,
"has", $self->count, "messages"
);
}
1 |
| Exobrain-1.08 | Exobrain::Measurement::Social | show |
| method respond(Str $text) {
$self->exobrain->intent('Response',
to => $self->from,
platform => $self->platform,
in_response_to => $self->id,
text => $text,
... |
| Exobrain-1.08 | Exobrain::Agent::Run | show |
| method start() {
$self->run;
my $class = ref($self);
my $message = "Error: $class exited run() method unexpectedly.";
try { $self->exobrain->notify($message, priority => 1); };
die $message;
}
1 |
| Exobrain-1.08 | Exobrain::Agent::Poll | show |
| method start() {
my $errors = 0;
while (1) {
try {
$self->poll;
sleep( $self->frequency );
$errors = 0;
}
catch {
warn $_;
$errors++;
if ($erro... |
| Exobrain-1.08 | Exobrain::Agent::Action::BeeInbox | show |
| method run() {
my $exobrain = $self->exobrain;
my $cache = $self->cache;
$exobrain->_load_component('Measurement::Mailbox');
$exobrain->_load_component('Intent::Beeminder');
my $inbox_goals = $self->config;
... |
| Exobrain-1.08 | Exobrain::Agent::Action::SimpleBeeHabit | show |
| method depends() {
return qw(Measurement::Beeminder Intent::HabitRPG);
}
method run() {
my $hrpg_tasks = $self->config;
$self->exobrain->watch_loop(
class => 'Measurement::Beeminder',
filter => sub { $hrpg_ta... |
| Exobrain-1.08 | Exobrain::Agent::Action::SocialNotify | show |
| method run {
$self->exobrain->watch_loop(
class => 'Measurement::Social',
filter => sub { $_->to_me },
then => sub {
$self->exobrain->notify( $_->summary )
},
);
}
1 |
| Exobrain-1.08 | Exobrain::Agent::Action::Ping | show |
| method run() {
$self->exobrain->watch_loop(
class => 'Measurement::Social',
filter => sub { $_->to_me and grep { /^ping$/ } @{ $_->tags } },
then => sub { $_->respond("Ack (via exobrain)"); },
);
... |
| Exobrain-1.08 | Exobrain::Agent::Action::SendmailXP | show |
| method depends() { qw(Intent::HabitRPG Measurement::Mailbox) }
method run(...) {
my $task = $self->config->{task} or die "No HabitRPG task";
my $cache = $self->cache;
$self->exobrain->watch_loop(
class => 'Measur... |
| Exobrain-Beeminder-1.06 | Exobrain::Measurement::Beeminder | show |
| method _build_user() {
return $self->_split_summary('user');
}
method _build_goal() {
return $self->_split_summary('goal');
}
method _split_summary($attr!) {
my %attrs;
@attrs{qw(user goal)} = split('/', $self->source);
ret... |
| Exobrain-Beeminder-1.06 | Exobrain::Agent::Beeminder::Sink | show |
| method run() {
my $bee = WebService::Beeminder->new(
token => $self->config->{auth_token}
);
$self->exobrain->watch_loop(
class => 'Intent::Beeminder',
then => sub {
my $event = shi... |
| Exobrain-Beeminder-1.06 | Exobrain::Agent::Beeminder::Source | show |
| method run() {
set port => 3000;
set logger => 'console';
set log => 'core';
set warnings => 1;
post qr{.*} => sub {
if( (param('action')||"") ne 'ADD') {
warning("Non-add packet receiv... |
| Exobrain-Beeminder-1.06 | Exobrain::Agent::Beeminder::Notify | show |
| method run() {
$self->exobrain->watch_loop(
class => 'Measurement::Beeminder',
then => sub {
$self->exobrain->notify($_->summary);
},
);
}
1 |
| Exobrain-Foursquare-0.01 | Exobrain::Agent::Foursquare | show |
| method foursquare_api($path, %args) {
my $base = $self->api_base;
my %full_args = (
v => '20130425',
oauth_token => $self->auth_token,
%args
);
my $arguments = join('&', map { "$_=$full_args{$_}" } ke... |
| Exobrain-Foursquare-0.01 | Exobrain::Agent::Foursquare::Source | show |
| method _build_last_check() {
return $self->cache->compute(LAST_CHECK, undef, sub { time() } );
}
method _last_check_update($value!, ...) {
$self->cache->set(LAST_CHECK, $value);
}
method poll() {
my $checktime = time();
my $... |
| Exobrain-HabitRPG-0.01 | Exobrain::Agent::HabitRPG | show |
| method _build_habit() {
my $config = $self->config;
my $api_token = $config->{api_token} or die "API token not found";
my $user_id = $config->{user_id} or die "User ID not found";
eval "use WebService::HabitRPG; 1;" or die $... |
| Exobrain-HabitRPG-0.01 | Exobrain::Agent::HabitRPG::Sink | show |
| method run() {
$self->exobrain->watch_loop(
class => 'Intent::HabitRPG',
then => sub {
my $event = shift;
my $hrpg = $self->habitrpg;
my $task = $event->task;
my... |
| Exobrain-Idonethis-1.08 | Exobrain::Agent::Idonethis | show |
| method _build_idonethis() {
my $config = $self->config;
my $user = $config->{user} or die "Can't find Idonethis/user";
my $pass = $config->{pass} or die "Can't find Idonethis/pass";
return WebService::Idonethis->new(
... |
| Exobrain-Idonethis-1.08 | Exobrain::Agent::Idonethis::Sink | show |
| method run() {
$self->exobrain->watch_loop(
class => 'Intent::PersonalLog',
then => sub {
my $event = shift;
my $text = $event->summary;
$self->idone->set_done(
... |
| Exobrain-Twitter-1.04 | Exobrain::Measurement::Tweet | show |
| Exobrain-Twitter-1.04 | Exobrain::Agent::Twitter | show |
| Exobrain-Twitter-1.04 | Exobrain::Agent::Twitter::Sink | show |
| Exobrain-Twitter-1.04 | Exobrain::Agent::Twitter::Source | show |
| Exobrain-Twitter-1.04 | Exobrain::Agent::Twitter::Response | show |
| FAIR-Data-1.001 | FAIR::Data | show |
| $FAIR::Data::VERSION = '1.001' |
| Facebook-Graph-1.1205 | recipe2 | show |
| true |
| Faker-0.12 | Faker | show |
| method provider (STRING $name) {
my $providers = $self->providers;
my $namespace = $self->namespace;
my $locale = $self->locale;
my $default = 'en_US';
return $providers->{$name}
if $providers->{$name};
... |
| Faker-0.12 | Faker::Provider::Internet | show |
| method domain_name () {
return join '.', $self->domain_word, $self->root_domain;
}
method domain_word () {
my $factory = $self->factory;
my $company = $factory->provider('Company');
my $string = lc $company->name;
$st... |
| Faker-0.12 | Faker::Provider::Color | show |
| method name () {
return $self->process(random => 'name');
}
method hex_code () {
my $number = $self->random_between(1, 16777215);
return '#' . sprintf('%06s', sprintf('%02x', $number));
}
method rgbcolors () {
return join ',', @... |
| Faker-0.12 | Faker::Provider::Payment | show |
| method card_expiration () {
my $pad = $self->random_between(1,3);
my $month = sprintf('%02d', $self->random_between(1,12));
my $year = sprintf('%02d', ((localtime)[5] % 100) + $pad);
return "$month/$year";
}
method card_number (S... |
| Faker-0.12 | Faker::Provider::Company | show |
| method name () {
return $self->process(random => 'name');
}
method name_suffix () {
return $self->process(random => 'name_suffix');
}
1 |
| Faker-0.12 | Faker::Provider::Address | show |
| method line1 () {
return $self->process(random => 'line1', number_markers => 1,
line_markers => 1);
}
method lines () {
return $self->process(random => 'lines', number_markers => 1,
line_markers => 1);
}
m... |
| Faker-0.12 | Faker::Provider::Person | show |
| method name () {
return $self->process(random => 'name');
}
method first_name () {
return $self->process(random => 'first_name');
}
method last_name () {
return $self->process(random => 'last_name');
}
method username () {... |
| Faker-0.12 | Faker::Provider::Lorem | show |
| method paragraph (INTEGER :$n_sentences = 4) {
return $self->sentences(n_sentences => $n_sentences) . "\n\n";
}
method paragraphs (INTEGER :$n_paragraphs = 2, INTEGER :$v_length = 5) {
return join "", map {
$v_length > 4 ?
... |
| Faker-0.12 | Faker::Provider::Telephone | show |
| method number () {
return $self->process(random => 'number', all_markers => 1);
}
1 |
| Faker-0.12 | Faker::Provider::en_US::Company | show |
| method buzzword_type1 () {
return $self->process(random => 'buzzword_type1');
}
method buzzword_type2 () {
return $self->process(random => 'buzzword_type2');
}
method buzzword_type3 () {
return $self->process(random => 'buz... |
| Faker-0.12 | Faker::Provider::en_US::Address | show |
| method city_prefix () {
return $self->process(random => 'city_prefix');
}
method country_name () {
return $self->process(random => 'country_name');
}
method line2 () {
return $self->process(random => 'line2', number_markers... |
| Faker-0.12 | Faker::Provider::en_US::Person | show |
| method name_prefix () {
return $self->process(random => 'name_prefix');
}
method name_suffix () {
return $self->process(random => 'name_suffix');
}
1 |
| Faker-0.12 | Faker::Role::Format | show |
| method format_lex_markers (STRING $string) {
$string =~ s/\?/$self->random_letter/eg;
return $string;
}
method format_line_markers (STRING $string) {
$string =~ s/\\n/\n/g;
return $string;
}
method format_number_markers (STRING $str... |
| Faker-0.12 | Faker::Role::Process | show |
| method process (
STRING :$random,
STRING :$all_markers = '',
STRING :$lex_markers = '',
STRING :$line_markers = '',
STRING :$number_markers = ''
) {
my $string = $self->process_random($random);
$string = $self->... |
| Faker-0.12 | Faker::Role::Data | show |
| method token_data () {
my $class = ref $self;
my @parents = do { no strict 'refs'; @{"${class}::ISA"} };
my @data = {};
for my $target ($class, @parents) {
push @data => $self->token_data_from_file($target);
pus... |
| Faker-0.12 | Faker::Role::Random | show |
| method random_between
(
Maybe[INTEGER] $from,
Maybe[INTEGER] $to
) {
my $max = 2147483647;
$from = 0 if !$from || $from > $max;
$to = $max if !$to || $to > $max;
return $from + int rand($to - $from);
}
method rand... |
| Fancy-Middleware-1.101680 | Fancy::Middleware | show |
| role Fancy::Middleware
{
use POEx::Types::PSGIServer(':all');
use MooseX::Types::Moose(':all');
has app => (is => 'ro', isa => CodeRef, required => 1);
has response => (is => 'ro', isa => PSGIResponse, writer =>... |
| Fey-SQL-Pg-0.005 | Fey::SQL::Pg::Role::Returning | show |
| method returning {
my $count = @_ ? @_ : 1;
my (@returning) = pos_validated_list(
\@_,
( ( { isa => SelectElement } ) x $count ),
MX_PARAMS_VALIDATE_NO_CACHE => 1,
);
for my $elt ( map { $_->can('columns')... |
| File-Find-Match-1.0 | File::Find::Match::Sugar | show |
| croak <<__DEPRECATED__ |
| File-HomeDir-Tiny-0.01 | File::HomeDir::Tiny | show |
| @EXPORT='home' |
| FileDirUtil-v0.04 | FileDirUtil | show |
| with 'FileDirUtil' |
| Filter-Simple-0.94 | DemoData | show |
| FILTER_ONLY
data => sub { s/(^|[ \t]+)(\S)/\u$2/gm },
all => sub { print } |
| Filter-Simple-0.94 | DemoSwear | show |
| FILTER_ONLY
all => sub { print "-------\n$_" },
string => sub { s/$RE{profanity}/darn/g },
all => sub { print "-------\n$_" },
code => sub { s/$RE{profanity}|[@%#&*]{3,}([-]\S+)?//g },
all => sub { print "-------\n$_" }, |
| Filter-Simple-0.94 | DotsForArrows | show |
| FILTER { s/\b\.(?=[a-z_\$({[])/->/gi } |
| Filter-Simple-0.94 | Demo_Exporter | show |
| FILTER {
s/dye/die/g;
} |
| Filter-Simple-0.94 | Demo_Data | show |
| FILTER { s/say/print/g; } |
| Filter-Simple-0.94 | Demo_REM | show |
| FILTER_ONLY
regex => sub { print "1a: $_\n"; s/\!\[/[^/g; print "1b: $_\n" },
all => sub { print "1c: $_\n" },
regex => sub { print "2a: $_\n"; s/%d/$RE{num}{int}/g; print "2b: $_\n" },
all => sub { print "2c: $_\n" },
regex => su... |
| Filter-Simple-0.94 | DemoUnPod | show |
| FILTER_ONLY
executable => sub { s/x/X/g },
executable => sub { print } |
| Filter-Simple-0.94 | DemoRevCat | show |
| FILTER_ONLY
code => sub {
my $ph = $Filter::Simple::placeholder;
s/($ph)\s*[.]\s*($ph)/$2.$1/g
}, |
| Filter-Simple-0.94 | Demo_Importer | show |
| FILTER {
s/dye/die/g;
} |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Account | show |
| class Finance::Bank::Bankwest::Account {
use MooseX::StrictConstructor;
for (
[ name => 'Str' ],
[ number => 'Str' ],
[ balance => 'Num' ],
[ credit_limit => 'Nu... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error | show |
| class Finance::Bank::Bankwest::Error
extends Throwable::Error
{
use MooseX::StrictConstructor;
has '+message' => (
builder => 'MESSAGE',
lazy => 1,
);
} |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Transaction | show |
| class Finance::Bank::Bankwest::Transaction is dirty {
use MooseX::StrictConstructor;
for (
[ date => 'Str' ],
[ narrative => 'Str' ],
[ cheque_num => 'Maybe[Str]' ],
[ amoun... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Session | show |
| class Finance::Bank::Bankwest::Session {
use Finance::Bank::Bankwest::Parsers ();
use MooseX::StrictConstructor;
use MooseX::Types;
use TryCatch;
class_type 'WWW::Mechanize';
with 'MooseX::OneArgNew' => {
type ... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::SessionFromLogin | show |
| class Finance::Bank::Bankwest::SessionFromLogin {
use Finance::Bank::Bankwest::Parsers ();
use Finance::Bank::Bankwest::Session ();
use MooseX::StrictConstructor;
use TryCatch;
use WWW::Mechanize ();
has 'pan' => (
... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::WithResponse | show |
| role Finance::Bank::Bankwest::Error::WithResponse {
use MooseX::Types;
class_type 'HTTP::Response';
with 'MooseX::OneArgNew' => {
type => 'HTTP::Response',
init_arg => 'response',
};
has 'response... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::BadResponse | show |
| class Finance::Bank::Bankwest::Error::BadResponse
extends Finance::Bank::Bankwest::Error
with Finance::Bank::Bankwest::Error::WithResponse
{
method MESSAGE {
'the Bankwest Online Banking server returned an unexpected response'
}
} |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::NotLoggedIn | show |
| class Finance::Bank::Bankwest::Error::NotLoggedIn
extends Finance::Bank::Bankwest::Error
{
} |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::ServiceMessage | show |
| class Finance::Bank::Bankwest::Error::ServiceMessage
extends Finance::Bank::Bankwest::Error
with Finance::Bank::Bankwest::Error::WithResponse
{
method MESSAGE {
'the Bankwest Online Banking server presented a service '
. 'm... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::ExportFailed | show |
| class Finance::Bank::Bankwest::Error::ExportFailed
extends Finance::Bank::Bankwest::Error
{
method MESSAGE {
return sprintf(
"%s %s [%s], %s\n%s",
'the Bankwest Online Banking server rejected transaction',
... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::ExportFailed::UnknownReason | show |
| class Finance::Bank::Bankwest::Error::ExportFailed::UnknownReason
extends Finance::Bank::Bankwest::Error::ExportFailed
with Finance::Bank::Bankwest::Error::WithResponse
{
method MESSAGE {
'the Bankwest Online Banking server declined to... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::NotLoggedIn::UnknownReason | show |
| class Finance::Bank::Bankwest::Error::NotLoggedIn::UnknownReason
extends Finance::Bank::Bankwest::Error::NotLoggedIn
with Finance::Bank::Bankwest::Error::WithResponse
{
method MESSAGE {
'a Bankwest Online Banking session cannot be esta... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::NotLoggedIn::Timeout | show |
| class Finance::Bank::Bankwest::Error::NotLoggedIn::Timeout
extends Finance::Bank::Bankwest::Error::NotLoggedIn
{
method MESSAGE {
'the Bankwest Online Banking session has timed out '
. 'due to inactivity'
}
} |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::NotLoggedIn::BadCredentials | show |
| class Finance::Bank::Bankwest::Error::NotLoggedIn::BadCredentials
extends Finance::Bank::Bankwest::Error::NotLoggedIn
{
method MESSAGE {
'could not log into Bankwest Online Banking; '
. 'invalid PAN/access code combination'
... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Error::NotLoggedIn::SubsequentLogin | show |
| class Finance::Bank::Bankwest::Error::NotLoggedIn::SubsequentLogin
extends Finance::Bank::Bankwest::Error::NotLoggedIn
{
method MESSAGE {
'the Bankwest Online Banking session has been terminated '
. 'due to a subsequent login'
... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Parser::Login | show |
| class Finance::Bank::Bankwest::Parser::Login
with HTTP::Response::Switch::Handler
{
use Finance::Bank::Bankwest::Error::NotLoggedIn::BadCredentials ();
use Finance::Bank::Bankwest::Error::NotLoggedIn::SubsequentLogin ();
use Finance::Bank:... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Parser::Logout | show |
| class Finance::Bank::Bankwest::Parser::Logout
with HTTP::Response::Switch::Handler
{
use Web::Scraper qw{ scraper process };
my $token = 'You have successfully logged out from your session';
my $scraper = scraper {
process '#conte... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Parser::TransactionExport | show |
| class Finance::Bank::Bankwest::Parser::TransactionExport
with HTTP::Response::Switch::Handler
{
use Finance::Bank::Bankwest::Transaction ();
use IO::String ();
use Text::CSV_XS 0.66 ();
method handle {
$self->decline
... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Parser::TransactionSearch | show |
| class Finance::Bank::Bankwest::Parser::TransactionSearch
with HTTP::Response::Switch::Handler
{
use Finance::Bank::Bankwest::Error::ExportFailed ();
use Finance::Bank::Bankwest::Error::ExportFailed::UnknownReason ();
use Web::Scraper qw{ s... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Parser::Accounts | show |
| class Finance::Bank::Bankwest::Parser::Accounts
with HTTP::Response::Switch::Handler
{
use Finance::Bank::Bankwest::Account ();
use Web::Scraper qw{ scraper process };
my $scraper = scraper {
process
'#_ctl0_ContentMai... |
| Finance-Bank-Bankwest-1.2.8 | Finance::Bank::Bankwest::Parser::ServiceMessage | show |
| class Finance::Bank::Bankwest::Parser::ServiceMessage
with HTTP::Response::Switch::Handler
{
use Finance::Bank::Bankwest::Error::ServiceMessage ();
use Web::Scraper qw{ scraper process };
my $scraper = scraper {
process '#divInter... |
| Finance-IBrokers-MooseCallback-0.02 | Finance::IBrokers::MooseCallback | show |
| class Finance::IBrokers::MooseCallback {
use MooseX::Types::Moose qw( Int Any Num HashRef ArrayRef Any);
use Data::Dumper;
use Time::HiRes::Value;
use Date::Manip;
use Finance::IBrokers::Types
qw(Contract Order OrderState Contr... |
| Finance-Instrument-0.02 | Finance::Instrument::FuturesContract | show |
| method BUILDARGS {
my %args = @_;
my $strp = DateTime::Format::Strptime->new(
pattern => '%F',
time_zone => $args{futures}->time_zone);
for (qw(last_trading_day first_trading_day)) {
if ($args{$_}) {
... |
| Finance-Instrument-0.02 | Finance::Instrument::Domain | show |
| method global {
$GLOBAL ||= __PACKAGE__->new;
}
method load_default_exchanges {
my $file = File::ShareDir::dist_file('Finance-Instrument', 'iso10383_mic.csv');
open my $fh, '<:encoding(utf8)', $file or die "$file: $!";
my $csv = Tex... |
| Finance-TA-v0.4.3 | Finance::TA | show |
| $INITIALIZED |
| Finance-TA-v0.4.3 | Finance::TA::TA_RetCodeInfo | show |
| $INITIALIZED |
| Flea-0.04 | Flea | show |
| default_export get Flea::Parser::Route { route(['get'], @_) }
default_export put Flea::Parser::Route { route(['put'], @_) }
default_export del Flea::Parser::Route { route(['del'], @_) }
default_export any Flea::Parser::Route { route(['a... |
| FreePAN-0.10 | FreePAN | show |
| const config_class => 'FreePAN::Config' |
| FreeRADIUS-Database-0.06 | FreeRADIUS::Database::Storage::Result::Radcheck | show |
| __PACKAGE__->set_primary_key( qw/ id / ) |
| FreeRADIUS-Database-0.06 | FreeRADIUS::Database::Storage::Result::MonthlyAgg | show |
| __PACKAGE__->set_primary_key( qw/ MTotAcctId / ) |
| FreeRADIUS-Database-0.06 | FreeRADIUS::Database::Storage::Result::Radacct | show |
| __PACKAGE__->set_primary_key( qw/ RadAcctId / ) |
| FreeRADIUS-Database-0.06 | FreeRADIUS::Database::Storage::Result::DailyAgg | show |
| __PACKAGE__->set_primary_key( qw/ TotAcctId / ) |
| FreeWRL-0.14 | VRML::NodeType | show |
| %VRML::Nodes = (
DEF => new VRML::NodeType("DEF",{node => [SFNode, NULL]}, id => [SFString,""]),
USE => new VRML::NodeType("USE",{node => [SFNode, NULL]}, id => [SFString,""]),
Shape => new VRML::NodeType ("Shape",
{appearance =>... |
| FreeWRL-0.14 | VRML::JPEG | show |
| bootstrap VRML::JPEG |
| FreeWRL-0.14 | VRML::PNG | show |
| bootstrap VRML::PNG |
| Freecell-App-0.03 | Freecell::App | show |
| run() unless caller |
| Function-Interface-0.06 | Foo | show |
| fun hello(Str $msg) :Return(Str) {
return "HELLO $msg";
}
1 |
| GD-Graph-sparklines-0.2 | GD::Graph::sparklines | show |
| $VERSION |
| GDGraph-boxplot-1.00 | GD::Graph::boxplot | show |
| $GD::Graph::boxplot::VERSION |
| GIFgraph-1.20 | GIFgraph | show |
| $GIFgraph::VERSION |
| GIFgraphExtensions-1.0 | GIFgraph::WithMap | show |
| $VERSION |
| GIFgraphExtensions-1.0 | GIFgraph::EvenlySpaced | show |
| $VERSION |
| GO-TermFinder-0.86 | GO::Reference | show |
| $VERSION = 0.1 |
| Games-Baseball-Scorecard-0.03 | Games::Baseball::Scorecard | show |
| $TEXD = <<'EOT' |
| GappX-NoticeBox-0.200 | GappX::NoticeBox | show |
| build 'GappX::NoticeBox', sub {
my ( $l, $w ) = @_;
my $gtkw = $w->gobject;
$gtkw->set_keep_above( 1 );
} |
| Gateway-0.42 | News::Gateway | show |
| $VERSION = 0.42 |
| Gedcom-1.20 | Gedcom::Grammar_5_5_1 | show |
| $grammar = bless( {
fh => \*Symbol::GEN2,
file => 'gedcom-5.5.1.grammar',
gedcom => {},
items => [
bless( {
file => '*',
items => [
bless( {
_items => 1,
file => '*',
gedcom => {},
items => [],
level => 0,
line => 3,
ma... |
| Gedcom-1.20 | Gedcom::Grammar_5_5 | show |
| $grammar = bless( {
fh => \*Symbol::GEN2,
file => 'gedcom-5.5.grammar',
gedcom => {},
items => [
bless( {
file => '*',
items => [
bless( {
_items => 1,
file => '*',
gedcom => {},
items => [],
level => 0,
line => 3,
max ... |
| Geo-Calc-XS-0.33 | Geo::Calc::XS | show |
| XSLoader::load 'Geo::Calc::XS', $VERSION |
| Getopt-Mixed-1.12 | Getopt::Mixed | show |
| $VERSION |
| Gimp-ScriptFu-Client-1.01 | Gimp::ScriptFu::Client | show |
| FILTER {
my $script = $_;
$script =~ s/\r\n/\n/g if $^O =~ /win32/i;
my $peer_host = "localhost";
my $peer_port = 10008;
my $verbose = 0;
my $syntax = 0;
my $include = '';
Getopt::Long::Configure("bundling... |
| Git-Gitalist-0.000003 | Git::Gitalist::HasUtils | show |
| method _build_util { confess(shift() . " cannot build _util") }
1 |
| Git-Gitalist-0.000003 | Git::Gitalist::Util | show |
| method BUILDARGS(@p) {
my $args = $self->SUPER::BUILDARGS(@p);
unless($args->{_git}) {
$args->{_git} ||= git_executable_path
or die "Could not find a git executable in the PATH";
}
return $args;
}
method run_cmd (@args) {
... |
| Git-Gitalist-0.000003 | Git::Gitalist::Repository | show |
| method BUILD($args) {
$self->$_() for qw/last_change owner description /;
}
method head_hash (Str $head?) {
my $output = $self->run_cmd(qw/rev-parse --verify/, $head || 'HEAD' );
confess("No such head: " . $head) unless defined $outpu... |
| Git-Gitalist-0.000003 | Git::Gitalist::Object::HasTree | show |
| method _build_tree {
my $output = $self->_run_cmd(qw/ls-tree -z/, $self->sha1);
return unless defined $output;
my @ret;
for my $line (split /\0/, $output) {
my ($mode, $type, $object, $file) = split /\s+/, $line, 4;
... |
| Git-Gitalist-0.000003 | Git::Gitalist::Object::Commit | show |
| method _build_tree {
return [$self->repository->get_object($self->tree_sha1)];
}
method sha_by_path ($path) {
$path =~ s{/+$}();
my @paths = $self->repository->run_cmd('ls-tree', $self->sha1, '--', $path)
or return;
... |
| Git-Gitalist-0.000003 | Git::Gitalist::Object::Tag | show |
| method _build_commit {
return Git::Gitalist::Object::Commit->new(
repository => $self->repository,
sha1 => $self->object,
type => 'commit',
);
}
method tree {
return [$self->repository->get_object($se... |
| Gitalist-Git-CollectionOfRepositories-Gitolite-0.002 | Gitalist::Git::CollectionOfRepositories::Gitolite | show |
| class Gitalist::Git::CollectionOfRepositories::Gitolite
with Gitalist::Git::CollectionOfRepositoriesWithRequestState
{
use MooseX::Types::Common::String qw/NonEmptySimpleStr/;
use Gitalist::Git::Types qw/DirOrUndef /;
has gitolite_co... |
| Gitalist-Git-CollectionOfRepositories-Gitolite-0.002 | Gitalist::Git::CollectionOfRepositories::Gitolite::Impl | show |
| class Gitalist::Git::CollectionOfRepositories::Gitolite::Impl
{
use MooseX::Types::Common::String qw/NonEmptySimpleStr/;
use MooseX::Types::Path::Class qw/Dir/;
use Moose::Util::TypeConstraints;
has remote_user => (
is =>... |
| Gitalist-Git-CollectionOfRepositories-Gitolite-0.002 | Gitalist::Git::CollectionOfRepositories::Gitolite::Collection | show |
| class Gitalist::Git::CollectionOfRepositories::Gitolite::Collection
extends Gitalist::Git::CollectionOfRepositories::FromListOfDirectories {
use MooseX::Types::Common::String qw/NonEmptySimpleStr/;
use Gitalist::Git::Types qw/DirOrUndef Ar... |
| Glade-Perl-0.61 | Glade::PerlRun | show |
| sub _ {gettext(@_)}
sub gettext {
defined $I18N->{'__'}{$_[0]} ? $I18N->{'__'}{$_[0]} : $_[0];
}
{
local $^W = 0;
eval "sub x_ {_check_gettext('__', \@_);}";
}
sub S_ { _check_gettext('__S', @_)}
sub D_ { _check_gettext('__D', @_)... |
| Glade-Perl-Two-0.01 | Glade::Two::Run | show |
| sub _ {gettext(@_)}
sub gettext {
defined $I18N->{$RUN_LANG}{$_[0]} ? $I18N->{$RUN_LANG}{$_[0]} : $_[0];
}
{
local $^W = 0;
eval "sub x_ {_check_gettext('__', \@_);}";
}
sub S_ { _check_gettext($SOURCE_LANG, @_)}
sub D_ { _check_g... |
| Gnuplot-Simple-0.013 | Gnuplot::Simple | show |
| func _is_valid (Str $r) {
$r =~ /^[^\n\r"]*\z/;
}
func _check_constraint ( ArrayRef[ArrayRef] $data ) {
die 'Non-empty data not accepted'
unless @$data;
for (@$data) {
assert @$_ > 0, "There must be more than one column";
... |
| GraphQL-0.36 | GraphQL::Execution | show |
| fun _get_field_def(
(InstanceOf['GraphQL::Schema']) $schema,
(InstanceOf['GraphQL::Type']) $parent_type,
StrNameValid $field_name,
) :ReturnType(Maybe[HashRef]) {
return $TYPE_NAME_META_FIELD_DEF
if $field_name eq $TYPE_NAME_META_FIELD_DEF->... |
| GraphQL-0.36 | GraphQL::Language::Receiver | show |
| method gotrule (Any $param = undef) {
return unless defined $param;
if ($KINDHASH21{$self->{parser}{rule}}) {
return {kind => $self->{parser}{rule}, %{$self->_locate_hash(_merge_hash($param))}};
} elsif ($KINDFIELDS21{$self->{pars... |
| GraphQL-0.36 | GraphQL::Language::Parser | show |
| fun parse(
Str $source,
Bool $noLocation = undef,
) :ReturnType(ArrayRef[HashRef]) {
my $parser = __PACKAGE__->SUPER::new(
grammar => $GRAMMAR,
receiver => GraphQL::Language::Receiver->new,
);
my $input = Pegex::Input->new... |
| Graphics-ColorDeficiency-0.05 | Graphics::ColorDeficiency::Data | show |
| $HASH = {
'cc3300' => [
'7e711b',
'8f6d00',
'cc3030'
],
'ccff99' => [
'ffeb97',
'ffd8ab... |
| Graphics-Grid-0.0001 | Graphics::Grid::Util | show |
| fun dots_to_inches( $x, $dpi ) { $x / $dpi; }
fun inches_to_dots( $x, $dpi ) { $x * $dpi; }
fun dots_to_cm( $x, $dpi ) { $x / $dpi * 2.54; }
fun cm_to_dots( $x, $dpi ) { $x / 2.54 * $dpi; }
fun points_to_cm($x) { $x / 72.27 * 2.54; }
fun cm_to_points($x... |
| Graphics-Grid-0.0001 | Graphics::Grid::Driver | show |
| method _transform_width_to_cm(
$unitlike, $idx, $gp,
$vp_width_cm = $self->_current_vp_width_cm,
$vp_height_cm = $self->_current_vp_height_cm
)
{
return $self->_transform_to_cm( $unitlike, $idx, $gp, $vp_width_cm );
}
method _... |
| Graphics-Grid-0.0001 | Graphics::Grid::Functions | show |
| fun grid_driver( :$driver = 'Cairo', %rest ) {
if ( $driver->DOES('Graphics::Grid::Driver') ) {
$grid->driver($driver);
}
else {
my $cls = "Graphics::Grid::Driver::$driver";
load $cls;
$grid->driver( $c... |
| Graphics-Grid-0.0001 | Graphics::Grid::Justifiable | show |
| method calc_left_bottom( $x, $y, $width, $height ) {
my $left = $x - $self->hjust * $width;
my $bottom = $y - $self->vjust * $height;
return ( $left, $bottom );
}
1 |
| Graphics-Grid-0.0001 | Graphics::Grid::Grob::Null | show |
| method _build_elems() { 0 }
method draw($driver) { }
1 |
| Graphics-Grid-0.0001 | Graphics::Grid::Grob::Text | show |
| method _build_elems() {
return scalar( @{ $self->label } );
}
method draw($driver) {
$driver->draw_text($self);
}
1 |
| Graphics-Grid-0.0001 | Graphics::Grid::Grob::Zero | show |
| method _build_elems() { 0 }
method draw($driver) { }
1 |
| Graphics-VTK-4.0.001 | Graphics::VTK::Colors | show |
| @violet_red_pale = qw/0.8588 0.4392 0.5765/ |
| Gtk2-Ex-ErrorTextDialog-11 | MyRunawayWarnAndError | show |
| print "runaway string\n
$something_undeclared
print "ANOTHER line\n";
1;
__END__
|
| Gtk2-Ex-PrintDialog-0.03 | Gtk2::Ex::PrintDialog | show |
| sub _ {
my $text = shift;
return ($GETTEXT == 1 ? Locale::gettext::gettext($text) : $text);
}
sub which {
my $cmd = shift;
foreach my $dir (split(/:/, $ENV{PATH})) {
my $path = File::Spec->catfile($dir, $cmd);
return $path if (-x $path);
}
r... |
| HTML-FormEngine-1.01 | HTML::FormEngine::ComplexSkin | show |
| $skin{_text} = '<input type="<&TYPE&>" value="<&value&>" name="<&NAME&>" id="<&ID&>" maxlength="<&MAXLEN&>" size="<&SIZE&>" <&readonly&> />' |
| HTML-TableLayout-1.001008 | HTML::TableLayout | show |
| %EXPORT_TAGS=(FORM=>
[qw(
form
choice
button
checkbox
textarea
hidden
faux
input_text
password
submit
radio
)]) |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::Standalone | show |
| __INTERFACE__ |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::ModPerl | show |
| __INTERFACE__ |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::Test | show |
| __INTERFACE__ |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::FCGI | show |
| __INTERFACE__ |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::CGI | show |
| __INTERFACE__ |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::ServerSimple | show |
| __INTERFACE__ |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::PSGI | show |
| __INTERFACE__ |
| HTTP-Engine-0.03005 | HTTP::Engine::Interface::POE | show |
| __INTERFACE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::UploadTemp | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::MobileAttribute | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::FillInForm | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::MethodOverride | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::DoCoMoGUID | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::ReverseProxy | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::Status | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::HTTPSession | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::Static | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::DebugRequest | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::ModuleReload | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::AccessLog | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::DebugScreen | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::Profile | show |
| __MIDDLEWARE__ |
| HTTP-Engine-Middleware-0.22 | HTTP::Engine::Middleware::Encode | show |
| __MIDDLEWARE__ |
| Hash-Abbrev-0.01 | Hash::Abbrev | show |
| __PACKAGE__ if 'first require' |
| IO-Async-Loop-AnyEvent2-ElectricBoogaloo-0.003 | IO::Async::Loop::AnyEvent2::ElectricBoogaloo | show |
| <<'' |
| IO-Callback-HTTP-0.003 | IO::Callback::HTTP | show |
| true |
| IPC-Run-20180523.0 | IPC::Run::Debug | show |
| eval( $disable_debugging ? <<'STUBS' : <<'SUBS' ) or die $@ |
| IPTables-IPv4-DBTarpit-0.44 | IPTables::IPv4::DBTarpit | show |
| $VERSION = do { q|char version[] = "dbtarpit 0.44, 1-27-14";| =~ /(\d+)\.(\d+)/; sprintf("%d.%02d",$1,$2)} |
| Image-ExifTool-11.50 | Image::ExifTool::Reconyx | show |
| %Image::ExifTool::Reconyx::Type3 = (
GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
PROCESS_PROC => \&Image::ExifTool::ProcessBinaryData,
WRITE_PROC => \&Image::ExifTool::WriteBinaryData,
CHECK_PROC => \&Image::ExifTool:... |
| Image-ExifTool-11.50 | Image::ExifTool::DJI | show |
| %Image::ExifTool::DJI::XMP = (
%Image::ExifTool::XMP::xmpTableDefaults,
GROUPS => { 0 => 'XMP', 1 => 'XMP-drone-dji', 2 => 'Location' },
NAMESPACE => 'drone-dji',
TABLE_DESC => 'XMP DJI',
VARS => { NO_ID => 1 },... |
| Image-ExifTool-11.50 | Image::ExifTool::GE | show |
| %Image::ExifTool::GE::Main = (
WRITE_PROC => \&Image::ExifTool::Exif::WriteExif,
CHECK_PROC => \&Image::ExifTool::Exif::CheckExif,
WRITABLE => 1,
GROUPS => { 0 => 'MakerNotes', 2 => 'Camera' },
NOTES => q{
... |
| Image-Placeholder-v1.0.0 | Image::Placeholder | show |
| method BUILD {
$self->set_size_from_string( $self->get_size() )
if defined $self->get_size();
$self->{'height'} = $self->get_width()
unless defined $self->get_height();
$self->{'width'} = 300
... |
| Image-ValidJpeg-1.002001 | Image::ValidJpeg | show |
| XSLoader::load('Image::ValidJpeg', $VERSION) |
| Imager-1.011 | Imager::File::GIF | show |
| Imager->register_writer
(
type=>'gif',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "gif_", $im);
unless (i_writegif_wiol($io, \%hsh, $im->{IMG})) {
... |
| Imager-1.011 | Imager::File::JPEG | show |
| Imager->register_writer
(
type=>'jpeg',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "jpeg_", $im);
$im->_set_opts(\%hsh, "exif_", $im);
my $qua... |
| Imager-1.011 | Imager::File::SGI | show |
| Imager->register_writer
(
type=>'sgi',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "sgi_", $im);
unless (i_writesgi_wiol($io, $im->{IMG})) {
... |
| Imager-1.011 | Imager::File::PNG | show |
| Imager->register_writer
(
type=>'png',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "png_", $im);
unless (i_writepng_wiol($im->{IMG}, $io)) {
... |
| Imager-1.011 | Imager::File::TIFF | show |
| Imager->register_writer
(
type=>'tiff',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "tiff_", $im);
$im->_set_opts(\%hsh, "exif_", $im);
if (def... |
| Imager-File-GIF-0.95 | Imager::File::GIF | show |
| Imager->register_writer
(
type=>'gif',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "gif_", $im);
unless (i_writegif_wiol($io, \%hsh, $im->{IMG})) {
... |
| Imager-File-JPEG-0.93 | Imager::File::JPEG | show |
| Imager->register_writer
(
type=>'jpeg',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "jpeg_", $im);
$im->_set_opts(\%hsh, "exif_", $im);
my $qua... |
| Imager-File-PNG-0.94 | Imager::File::PNG | show |
| Imager->register_writer
(
type=>'png',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "png_", $im);
unless (i_writepng_wiol($im->{IMG}, $io)) {
... |
| Imager-File-TIFF-0.89 | Imager::File::TIFF | show |
| Imager->register_writer
(
type=>'tiff',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "tiff_", $im);
$im->_set_opts(\%hsh, "exif_", $im);
if (def... |
| Imager-File-WEBP-0.005 | Imager::File::WEBP | show |
| Imager->register_writer
(
type=>'webp',
single =>
sub {
my ($im, $io, %hsh) = @_;
$im->_set_opts(\%hsh, "i_", $im);
$im->_set_opts(\%hsh, "webp_", $im);
unless (i_writewebp($im->{IMG}, $io, $hsh{webp_co... |
| Imager-Filter-Binarization-0.002 | Imager::Filter::Binarization | show |
| Imager->register_filter(
type => 'binarization',
callsub => \&binarization_filter,
callseq => ['image', 'method', 'geometry'],
defaults => {},
) |
| Isam-0.2 | Person | show |
| $kd_prenom_nom->k_part( 1, [ 0, 21, &CHARTYPE ] ) |
| JBD-0.04 | JBD::Core::List | show |
| sub _(@) {
croak 'Missing required arguments' if !@_;
croak "Not a unit or list: [@_]"
if !is_unit @_ && !is_list @_;
return [$_[0]] if is_unit @_;
@_ > 1 ? \@_ : $_[0];
}
sub ret(@) { wantarray ? @{$_[0]} : shift }
sub fla... |
| JSON-Schema-AsType-0.4.3 | JSON::Schema::AsType::Draft3 | show |
| JSON::Schema::AsType->new(
draft_version => '3',
uri => 'http://json-schema.org/draft-03/schema',
schema => from_json <<'END_JSON' )->type |
| Java-JVM-Classfile-0.20 | Java::JVM::Classfile::Ops | show |
| %ops = (
0 => {
name => 'nop',
operands => 0,
operand_types => [],
consumed => 0,
produced => 0,
type => 'noargs',
},
1 => {
name => 'aconst_null',
... |
| Jenkins-NotificationListener-0.06 | Jenkins::NotificationListener | show |
| method start ($prepare_cb) {
return tcp_server $self->host, $self->port , sub {
my ($fh, $host, $port) = @_;
my $json = '';
my $buf = '';
while( my $bytes = sysread $fh, $buf, 1024 ) {
$json .= $buf;
... |
| Job-Async-Redis-0.003 | Job::Async::Worker::Redis | show |
| async sub on_job_received {
my ($self, $id) = (shift, @$_);
try {
my ($queue) = $self->pending_queues;
$log->debugf('Received job %s', $id);
if(exists $self->{pending_jobs}{$id}) {
$log->errorf("Alr... |
| Kwiki-0.39 | Kwiki::Base | show |
| field 'id' |
| Kwiki-0.39 | Kwiki::Widgets | show |
| const pane_unit => 'widget' |
| Kwiki-0.39 | Kwiki::Status | show |
| const pane_template => 'status_pane.html' |
| Kwiki-0.39 | Kwiki::Cookie | show |
| const prefix => 'Kwiki-' |
| Kwiki-0.39 | Kwiki::Files | show |
| const class_title => 'Kwiki Files' |
| Kwiki-0.39 | Kwiki::CSS | show |
| conf css_path => [ 'css' ] |
| Kwiki-0.39 | Kwiki::Javascript | show |
| conf javascript_path => [ 'javascript' ] |
| Kwiki-0.39 | Kwiki::Theme::Basic | show |
| const class_title => 'Basic Theme' |
| Kwiki-0.39 | Kwiki::Template::TT2 | show |
| conf template_path => [ './template/tt2' ] |
| Kwiki-DB-0.02 | Kwiki::DB | show |
| const id => 'db' |
| Kwiki-Icons-Gnome-0.15 | Kwiki::Icons::Gnome | show |
| const icons_path => 'icons/gnome/template' |
| Kwiki-Theme-ColumnLayout-0.08 | Kwiki::Theme::ColumnLayout | show |
| const class_title => 'Column Layout Theme' |
| Kwiki-Theme-Klassik-0.12 | Kwiki::Theme::Klassik | show |
| const class_title => 'Klassik Theme' |
| Lexical-Attributes-2009121601 | Lexical::Attributes | show |
| FILTER_ONLY
all => sub {%attributes = ()},
code => sub {
1 while s/( # Save
(?<!$sigil) # Not preceeded by a sigil
\# # Start of a comment.
... |
| Lingua-EN-Numbers-Easy-2014120401 | Lingua::EN::Numbers::Easy | show |
| tie %N => __PACKAGE__ |
| Lingua-EN-Semtags-Engine-0.01 | Lingua::EN::Semtags::Engine | show |
| TRUE |
| Lingua-EN-Semtags-Engine-0.01 | Lingua::EN::Semtags::Sentence | show |
| TRUE |
| Lingua-EN-Semtags-Engine-0.01 | Lingua::EN::Semtags::LangUnit | show |
| TRUE |
| Lingua-EN-SimilarNames-Levenshtein-0.10 | Lingua::EN::SimilarNames::Levenshtein | show |
| class Person {
has 'first_name' => (isa => 'Str', is => 'ro', default => '');
has 'last_name' => (isa => 'Str', is => 'ro', default => '');
has 'full_name' => (
isa => 'Str',
is =&... |
| Lingua-EN-VerbTense-3.003 | Lingua::EN::VerbTense | show |
| verb 'zoom','zooms','zoomed','zoomed','zooming' |
| Lingua-FreeLing3-0.09 | Lingua::FreeLing3::Bindings | show |
| *traces_TraceModule = *Lingua::FreeLing3::Bindingsc::traces_TraceModule |
| Lingua-IN-TGC-2.04 | Lingua::IN::TGC | show |
| method TGC( Str $lang, Str $string ) {
my $lang_code = "Lingua::IN::TGC::" . $lang;
my $parser = qr {
<extends: $lang_code>
<nocontext:>
<String>
<objrule: IN::String> <[Tgc]>+
}... |
| Lingua-JP-Kanjidic-1.1 | Lingua::JP::Kanjidic | show |
| %joyo = map { chr(hex($_))=>1 } qw(
4E00 4E5D 4E03 4E8C 4EBA 5165 516B 529B 5341 4E0B 4E09 5343 4E0A 53E3 571F 5915
5927 5973 5B50 5C0F 5C71 5DDD 4E94 5929 4E2D 516D 5186 624B 6587 65E5 6708 6728
6C34 706B 72AC 738B 6B63 51FA 672C 53F3 56DB 5DE6 7389 ... |
| Lingua-PT-Speaker-0.12 | Lingua::PT::Speaker::AdjWords | show |
| RULES a
//==>/
(e|a)/\1==>/$1
6/6(?!~)==>/a
6/a==>/a
S/([a\@eA6iouOE])==>z/$1
\@/([eaoOEu])==>i/$1
\@/([\@i6])==>/$1
## u/($vg)==>w/$1
ENDRULES
1 |
| Lingua-PT-Speaker-0.12 | Lingua::PT::Speaker::Prosody | show |
| RULES a |
| Lingua-ZH-ChineseNaming-0.02 | Lingua::ZH::ChineseNaming | show |
| $CHARS=<<EOF |
| Log-Fu-0.31 | Log::Fu::Common | show |
| push @EXPORT, 'fu_term_is_ansi' |
| Lvalue-0.21 | Lvalue | show |
| __PACKAGE__ if 'first require' |
| M-1.000001 | M | show |
| $VERSION = 1.000001 |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI8_R | show |
| +{
'�',' ',
'�','©',
'�','°',
'�','²',
'�','·',
'�','÷',
'�','Ё',
'�','А',
'�','Б',
'�','В',
'�','Г',
'�','Д',
'�','Е',
'�','Ж',
'�','З',
'�','И',
'�','Й',
'�'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::GB2312 | show |
| +{
'��',' ',
'��','、',
'��','。',
'��','・',
'��','ˉ',
'��','ˇ',
'��','¨',
'��','〃',
'��','々',
'��','―',
'��','～',
'��','‖',
'��','…',
'��','‘',
'��','’',
'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::BIG5_ETEN | show |
| +{
'�',' ',
'��','§',
'��','¨',
'��','¯',
'�X','°',
'��','±',
'�P','·',
'��','×',
'��','÷',
'��','ø',
'�','ú',
'�','û',
'�','ý',
'�','þ',
'�','ÿ',
'��','ŋ',
'��','œ',
'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::HP_ROMAN8 | show |
| +{
'�',' ',
'�','À',
'�','Â',
'�','È',
'�','Ê',
'�','Ë',
'�','Î',
'�','Ï',
'�','´',
'�','ˋ',
'�','ˆ',
'�','¨',
'�','˜',
'�','Ù',
'�','Û',
'�','₤',
'�','¯',
'�','
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1255 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::BIG5_HKSCS | show |
| +{
'�@','',
'�A','',
'�B','',
'�C','',
'�D','',
'�E','',
'�F','',
'�G','',
'�H','',
'�I','',
'�J','',
'�K','',
'�L','',
'�M','',
'�N','... |
| MHonArc-2.6.19 | MHonArc::CharEnt::GOST19768_87 | show |
| +{
'$','¤',
'�',' ',
'�','Ё',
'�','',
'�','А',
'�','Б',
'�','В',
'�','Г',
'�','Д',
'�','Е',
'�','Ж',
'�','З',
'�','И',
'�','Й',
'�','К',
'�','Л',
'�','М',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleCroatian | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_11 | show |
| +{
'�',' ',
'�','ก',
'�','ข',
'�','ฃ',
'�','ค',
'�','ฅ',
'�','ฆ',
'�','ง',
'�','จ',
'�','ฉ',
'�','ช',
'�','ซ',
'�','ฌ',
'�','ญ',
'�','ฎ',
'�','ฏ',
'�','ฐ'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI8_U | show |
| +{
'�','─',
'�','│',
'�','┌',
'�','┐',
'�','└',
'�','┘',
'�','├',
'�','┤',
'�','┬',
'�','┴',
'�','┼',
'�','▀',
'�','▄',
'�','█',
'�','▌',
'�','▐... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1258 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleRoman | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleCenteuro | show |
| +{
'�',' ',
'�','£',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','®',
'�','°',
'�','¶',
'�','»',
'�','Á',
'�','Ä',
'�','É',
'�','Í',
'�','Ó',
'�','Ô',
'�','Õ',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1251 | show |
| +{
'�',' ',
'�','¤',
'�','¦',
'�','§',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','µ',
'�','¶',
'�','·',
'�','»',
'�','Ё',
'�','Ђ',
'�','Ѓ... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP866 | show |
| +{
'�',' ',
'�','¤',
'�','°',
'�','·',
'�','Ё',
'�','Є',
'�','Ї',
'�','Ў',
'�','А',
'�','Б',
'�','В',
'�','Г',
'�','Д',
'�','Е',
'�','Ж',
'�','З',
'�','И',
'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP936 | show |
| +{
'�','€',
'��','¤',
'��','§',
'��','¨',
'��','°',
'��','±',
'��','·',
'��','×',
'��','à',
'��','á',
'��','è',
'��','é',
'��','ê',
'��','ì',
'��','í',
'��','ò',
'��','ó... |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI_0 | show |
| +{
'$','¤',
'@','ю',
'A','а',
'B','б',
'C','ц',
'D','д',
'E','е',
'F','ф',
'G','г',
'H','х',
'I','и',
'J','й',
'K','к',
'L','л',
'M','м',
'N','н',
'O','о'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleRomanian | show |
| +{
'�','Ș',
'�','Ț',
'�','ș',
'�','ț',
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_4 | show |
| +{
'�',' ',
'�','Ą',
'�','ĸ',
'�','Ŗ',
'�','¤',
'�','Ĩ',
'�','Ļ',
'�','§',
'�','¨',
'�','Š',
'�','Ē',
'�','Ģ',
'�','Ŧ',
'�','',
'�','Ž',
'�','¯',
'�','°',
'�',... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_3 | show |
| +{
'�',' ',
'�','Ħ',
'�','˘',
'�','£',
'�','¤',
'�','Ĥ',
'�','§',
'�','¨',
'�','İ',
'�','Ş',
'�','Ğ',
'�','Ĵ',
'�','',
'�','Ż',
'�','°',
'�','ħ',
'�','²',
'�','... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleArabic | show |
| +{
'�','Ä',
'�',' ',
'�','Ç',
'�','É',
'�','Ñ',
'�','Ö',
'�','Ü',
'�','á',
'�','à',
'�','â',
'�','ä',
'�','ں',
'�','«',
'�','ç',
'�','é',
'�','è',
'�','ê',
'�','ë',... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1256 | show |
| +{
'�',' ',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1257 | show |
| +{
'�',' ',
'�','¢',
'�','£',
'�','¤',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI8_F | show |
| +{
'�','─',
'�','│',
'�','┌',
'�','┐',
'�','└',
'�','┘',
'�','├',
'�','┤',
'�','┬',
'�','┴',
'�','┼',
'�','▀',
'�','▄',
'�','█',
'�','▌',
'�','▐... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1250 | show |
| +{
'�',' ',
'�','¤',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_15 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','€',
'�','¥',
'�','Š',
'�','§',
'�','š',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±... |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI8_B | show |
| +{
'�','ё',
'�','Ё',
'�','ю',
'�','а',
'�','б',
'�','ц',
'�','д',
'�','е',
'�','ф',
'�','г',
'�','х',
'�','и',
'�','й',
'�','к',
'�','л',
'�','м',
'�','н... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleHebrew | show |
| +{
'�','Ä',
'�','ײַ',
'�','Ç',
'�','É',
'�','Ñ',
'�','Ö',
'�','Ü',
'�','á',
'�','à',
'�','â',
'�','ä',
'�','ã',
'�','å',
'�','ç',
'�','é',
'�','è',
'�','ê',
'�','ë'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI8_E | show |
| +{
'�',' ',
'�','ђ',
'�','ѓ',
'�','ё',
'�','є',
'�','ѕ',
'�','і',
'�','ї',
'�','ј',
'�','љ',
'�','њ',
'�','ћ',
'�','ќ',
'�','',
'�','ў',
'�','џ',
'�','№'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_8 | show |
| +{
'�',' ',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','×',
'�','«',
'�','¬',
'�','',
'�','®',
'�','‾',
'�','°',
'�','±',
'�','²'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleTurkish | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1252 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleGreek | show |
| +{
'�',' ',
'�','£',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','²',
'�','³',
'�','·',
'�','¹',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_2 | show |
| +{
'�',' ',
'�','Ą',
'�','˘',
'�','Ł',
'�','¤',
'�','Ľ',
'�','Ś',
'�','§',
'�','¨',
'�','Š',
'�','Ş',
'�','Ť',
'�','Ź',
'�','',
'�','Ž',
'�','Ż',
'�','°',
'�'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP949 | show |
| +{
'��','¡',
'��','¤',
'��','§',
'��','¨',
'��','ª',
'��','',
'��','®',
'��','°',
'��','±',
'��','²',
'��','³',
'��','´',
'��','¶',
'��','·',
'��','¸',
'��','¹',
'��','º... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_10 | show |
| +{
'�',' ',
'�','Ą',
'�','Ē',
'�','Ģ',
'�','Ī',
'�','Ĩ',
'�','Ķ',
'�','§',
'�','Ļ',
'�','Đ',
'�','Š',
'�','Ŧ',
'�','Ž',
'�','',
'�','Ū',
'�','Ŋ',
'�','°',
'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI8_A | show |
| +{
'$','¤',
'�','ю',
'�','а',
'�','б',
'�','ц',
'�','д',
'�','е',
'�','ф',
'�','г',
'�','х',
'�','и',
'�','й',
'�','к',
'�','л',
'�','м',
'�','н',
'�','о'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::VISCII | show |
| +{
'','Ẳ',
'','Ẵ',
'','Ẫ',
'','Ỷ',
'','Ỹ',
' ','Ỵ',
'�','Ạ',
'�','Ắ',
'�','Ằ',
'�','Ặ',
'�','Ấ',
'�','Ầ',
'�','Ẩ',
'�','Ậ',
'�','Ẽ',
'�','Ẹ... |
| MHonArc-2.6.19 | MHonArc::CharEnt::EUC_JP | show |
| +{
'��','｡',
'��','｢',
'��','｣',
'��','､',
'��','･',
'��','ｦ',
'��','ｧ',
'��','ｨ',
'��','ｩ',
'��','ｪ',
'��','ｫ',
'��','ｬ',
'��','ｭ',
'��','ｮ',
'��','ｯ... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_6 | show |
| +{
'�',' ',
'�','¤',
'�','،',
'�','',
'�','؛',
'�','؟',
'�','ء',
'�','آ',
'�','أ',
'�','ؤ',
'�','إ',
'�','ئ',
'�','ا',
'�','ب',
'�','ة',
'�','ت',
'�','ث',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleIceland | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_14 | show |
| +{
'�',' ',
'�','Ḃ',
'�','ḃ',
'�','£',
'�','Ċ',
'�','ċ',
'�','Ḋ',
'�','§',
'�','Ẁ',
'�','©',
'�','Ẃ',
'�','ḋ',
'�','Ỳ',
'�','',
'�','®',
'�','Ÿ',
'�','ǡ... |
| MHonArc-2.6.19 | MHonArc::CharEnt::KOI_7 | show |
| +{
'$','¤',
'`','Ю',
'a','А',
'b','Б',
'c','Ц',
'd','Д',
'e','Е',
'f','Ф',
'g','Г',
'h','Х',
'i','И',
'j','Й',
'k','К',
'l','Л',
'm','М',
'n','Н',
'o','О'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1253 | show |
| +{
'�',' ',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','²',
'�','³',
'�','µ',
'�','¶',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP1254 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP932 | show |
| +{
'��','§',
'�N','¨',
'��','°',
'�}','±',
'�L','´',
'��','¶',
'�~','×',
'��','÷',
'��','Α',
'��','Β',
'��','Γ',
'��','Δ',
'��','Ε',
'��','Ζ',
'��','Η',
'��','Θ',
'��'... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_5 | show |
| +{
'�',' ',
'�','Ё',
'�','Ђ',
'�','Ѓ',
'�','Є',
'�','Ѕ',
'�','І',
'�','Ї',
'�','Ј',
'�','Љ',
'�','Њ',
'�','Ћ',
'�','Ќ',
'�','',
'�','Ў',
'�','Џ',
'�','А',... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_1 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::CP950 | show |
| +{
'��','§',
'��','¯',
'�X','°',
'��','±',
'�P','·',
'��','×',
'��','÷',
'��','ˇ',
'��','ˉ',
'��','ˊ',
'��','ˋ',
'��','ˍ',
'��','˙',
'�D','Α',
'�E','Β',
'�F','Γ',
'�G... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleThai | show |
| +{
'�',' ',
'�','©',
'�','«',
'�','®',
'�','»',
'�','ก',
'�','ข',
'�','ฃ',
'�','ค',
'�','ฅ',
'�','ฆ',
'�','ง',
'�','จ',
'�','ฉ',
'�','ช',
'�','ซ',
'�','ฌ',
'�... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_7 | show |
| +{
'�',' ',
'�','ʽ',
'�','ʼ',
'�','£',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','―',
'�','°',
'�','±',
'�','²',
'�','³',
'�','΄',
'�','... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_13 | show |
| +{
'�',' ',
'�','”',
'�','¢',
'�','£',
'�','¤',
'�','„',
'�','¦',
'�','§',
'�','Ø',
'�','©',
'�','Ŗ',
'�','«',
'�','¬',
'�','',
'�','®',
'�','Æ',
'�','°',
'�',' ... |
| MHonArc-2.6.19 | MHonArc::CharEnt::AppleCyrillic | show |
| +{
'�',' ',
'�','£',
'�','§',
'�','©',
'�','«',
'�','¬',
'�','®',
'�','°',
'�','±',
'�','µ',
'�','¶',
'�','»',
'�','÷',
'�','ƒ',
'�','Ё',
'�','Ђ',
'�','Ѓ',
'�','@... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_9 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
... |
| MHonArc-2.6.19 | MHonArc::CharEnt::ISO8859_16 | show |
| +{
'�',' ',
'�','Ą',
'�','ą',
'�','Ł',
'�','€',
'�','„',
'�','Š',
'�','§',
'�','š',
'�','©',
'�','Ș',
'�','«',
'�','Ź',
'�','',
'�','ź',
'�','Ż',
'�','°',
'... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI8_R | show |
| +{
'�',' ',
'�','©',
'�','°',
'�','²',
'�','·',
'�','÷',
'�','Ё',
'�','А',
'�','Б',
'�','В',
'�','Г',
'�','Д',
'�','Е',
'�','Ж',
'�','З',
'�','И',
'�','Й',
'�','К',
'�','Л',
'�','М',
'�','Н',
'�','О',
'�','П',
'�','Р',
'�','С',
'�','Т',
'�','У',
'�','Ф',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::GB2312 | show |
| +{
'��',' ',
'��','、',
'��','。',
'��','・',
'��','ˉ',
'��','ˇ',
'��','¨',
'��','〃',
'��','々',
'��','―',
'��','～',
'��','‖',
'��','…',
'��','‘',
'��','’',
'��','“',
'��','”',
'��','〔',
'��','〕',
'��','〈',
'��','〉',
'��','《',
'��','》',
'��','「',
'��','」',
'�... |
| MHonArc-2.6.19 | MHonArc::UTF8::BIG5_ETEN | show |
| +{
'�',' ',
'��','§',
'��','¨',
'��','¯',
'�X','°',
'��','±',
'�P','·',
'��','×',
'��','÷',
'��','ø',
'�','ú',
'�','û',
'�','ý',
'�','þ',
'�','ÿ',
'��','ŋ',
'��','œ',
'��','ɐ',
'��','ɔ',
'��','ɛ',
'��','ɪ',
'��','ɵ',
'��','ʃ',
'��','ʊ',
'��','ˆ',
'��','ˇ'... |
| MHonArc-2.6.19 | MHonArc::UTF8::HP_ROMAN8 | show |
| +{
'�',' ',
'�','À',
'�','Â',
'�','È',
'�','Ê',
'�','Ë',
'�','Î',
'�','Ï',
'�','´',
'�','ˋ',
'�','ˆ',
'�','¨',
'�','˜',
'�','Ù',
'�','Û',
'�','₤',
'�','¯',
'�','Ý',
'�','ý',
'�','°',
'�','Ç',
'�','ç',
'�','Ñ',
'�','ñ',
'�','¡',
'�','¿',
'�','¤',
'�','£',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1255 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','»',
'�','¼',
'�','½',
'�','¾',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::BIG5_HKSCS | show |
| +{
'�@','',
'�A','',
'�B','',
'�C','',
'�D','',
'�E','',
'�F','',
'�G','',
'�H','',
'�I','',
'�J','',
'�K','',
'�L','',
'�M','',
'�N','',
'�O','',
'�P','',
'�Q','',
'�R','',
'�S','',
'�T','',
'�U','',
'�V','Ā',
'�W','Á',
'�X','Ǎ',
'�... |
| MHonArc-2.6.19 | MHonArc::UTF8::GOST19768_87 | show |
| +{
'$','¤',
'�',' ',
'�','Ё',
'�','',
'�','А',
'�','Б',
'�','В',
'�','Г',
'�','Д',
'�','Е',
'�','Ж',
'�','З',
'�','И',
'�','Й',
'�','К',
'�','Л',
'�','М',
'�','Н',
'�','О',
'�','П',
'�','Р',
'�','С',
'�','Т',
'�','У',
'�','Ф',
'�','Х',
'�','Ц',
'�','Ч',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleCroatian | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','º',
'�','»',
'�','¿',
'�','À',
'�','Á',
'�','Â',
'�','Ã',
'�','Ä',
'�','Å',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_11 | show |
| +{
'�',' ',
'�','ก',
'�','ข',
'�','ฃ',
'�','ค',
'�','ฅ',
'�','ฆ',
'�','ง',
'�','จ',
'�','ฉ',
'�','ช',
'�','ซ',
'�','ฌ',
'�','ญ',
'�','ฎ',
'�','ฏ',
'�','ฐ',
'�','ฑ',
'�','ฒ',
'�','ณ',
'�','ด',
'�','ต',
'�','ถ',
'�','ท',
'�','ธ',
'�','น',
'�','บ',
'�','ป',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI8_U | show |
| +{
'�','─',
'�','│',
'�','┌',
'�','┐',
'�','└',
'�','┘',
'�','├',
'�','┤',
'�','┬',
'�','┴',
'�','┼',
'�','▀',
'�','▄',
'�','█',
'�','▌',
'�','▐',
'�','░',
'�','▒',
'�','▓',
'�','⌠',
'�','■',
'�','•',
'�','√',
'�','≈',
'�','≤',
'�','≥',
'�',' ',
'�','⌡',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1258 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','º',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleRoman | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','º',
'�','»',
'�','¿',
'�','À',
'�','Á',
'�','Â',
'�','Ã',
'�','Ä',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleCenteuro | show |
| +{
'�',' ',
'�','£',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','®',
'�','°',
'�','¶',
'�','»',
'�','Á',
'�','Ä',
'�','É',
'�','Í',
'�','Ó',
'�','Ô',
'�','Õ',
'�','Ö',
'�','Ú',
'�','Ü',
'�','Ý',
'�','ß',
'�','á',
'�','ä',
'�','é',
'�','í',
'�','ó',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1251 | show |
| +{
'�',' ',
'�','¤',
'�','¦',
'�','§',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','µ',
'�','¶',
'�','·',
'�','»',
'�','Ё',
'�','Ђ',
'�','Ѓ',
'�','Є',
'�','Ѕ',
'�','І',
'�','Ї',
'�','Ј',
'�','Љ',
'�','Њ',
'�','Ћ',
'�','Ќ',
'�','Ў',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP866 | show |
| +{
'�',' ',
'�','¤',
'�','°',
'�','·',
'�','Ё',
'�','Є',
'�','Ї',
'�','Ў',
'�','А',
'�','Б',
'�','В',
'�','Г',
'�','Д',
'�','Е',
'�','Ж',
'�','З',
'�','И',
'�','Й',
'�','К',
'�','Л',
'�','М',
'�','Н',
'�','О',
'�','П',
'�','Р',
'�','С',
'�','Т',
'�','У',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP936 | show |
| +{
'�','€',
'��','¤',
'��','§',
'��','¨',
'��','°',
'��','±',
'��','·',
'��','×',
'��','à',
'��','á',
'��','è',
'��','é',
'��','ê',
'��','ì',
'��','í',
'��','ò',
'��','ó',
'��','÷',
'��','ù',
'��','ú',
'��','ü',
'��','ā',
'��','ē',
'��','ě',
'��','ī',
'��... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI_0 | show |
| +{
'$','¤',
'@','ю',
'A','а',
'B','б',
'C','ц',
'D','д',
'E','е',
'F','ф',
'G','г',
'H','х',
'I','и',
'J','й',
'K','к',
'L','л',
'M','м',
'N','н',
'O','о',
'P','п',
'Q','я',
'R','р',
'S','с',
'T','т',
'U','у',
'V','ж',
'W','в',
'X','ь',
'Y','ы',
'Z','з',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleRomanian | show |
| +{
'�','Ș',
'�','Ț',
'�','ș',
'�','ț',
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','º',
'�','»',
'�','¿',
'�','... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_4 | show |
| +{
'�',' ',
'�','Ą',
'�','ĸ',
'�','Ŗ',
'�','¤',
'�','Ĩ',
'�','Ļ',
'�','§',
'�','¨',
'�','Š',
'�','Ē',
'�','Ģ',
'�','Ŧ',
'�','',
'�','Ž',
'�','¯',
'�','°',
'�','ą',
'�','˛',
'�','ŗ',
'�','´',
'�','ĩ',
'�','ļ',
'�','ˇ',
'�','¸',
'�','š',
'�','ē',
'�','ģ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_3 | show |
| +{
'�',' ',
'�','Ħ',
'�','˘',
'�','£',
'�','¤',
'�','Ĥ',
'�','§',
'�','¨',
'�','İ',
'�','Ş',
'�','Ğ',
'�','Ĵ',
'�','',
'�','Ż',
'�','°',
'�','ħ',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','ĥ',
'�','·',
'�','¸',
'�','ı',
'�','ş',
'�','ğ',
'�','ĵ',
'�','½',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleArabic | show |
| +{
'�','Ä',
'�',' ',
'�','Ç',
'�','É',
'�','Ñ',
'�','Ö',
'�','Ü',
'�','á',
'�','à',
'�','â',
'�','ä',
'�','ں',
'�','«',
'�','ç',
'�','é',
'�','è',
'�','ê',
'�','ë',
'�','í',
'�','…',
'�','î',
'�','ï',
'�','ñ',
'�','ó',
'�','»',
'�','ô',
'�','ö',
'�','÷',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1256 | show |
| +{
'�',' ',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','»',
'�','¼',
'�','½',
'�','¾',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1257 | show |
| +{
'�',' ',
'�','¢',
'�','£',
'�','¤',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','»',
'�','¼',
'�','½',
'�','¾',
'�','Ä',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI8_F | show |
| +{
'�','─',
'�','│',
'�','┌',
'�','┐',
'�','└',
'�','┘',
'�','├',
'�','┤',
'�','┬',
'�','┴',
'�','┼',
'�','▀',
'�','▄',
'�','█',
'�','▌',
'�','▐',
'�','░',
'�','‘',
'�','’',
'�','“',
'�','”',
'�','•',
'�','–',
'�','—',
'�','©',
'�','™',
'�','»',
'�','®',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1250 | show |
| +{
'�',' ',
'�','¤',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','»',
'�','Á',
'�','Â',
'�','Ä',
'�','Ç',
'�','É',
'�','Ë',
'�','Í',
'�','Î',
'�','Ó',
'�','Ô',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_15 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','€',
'�','¥',
'�','Š',
'�','§',
'�','š',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','Ž',
'�','µ',
'�','¶',
'�','·',
'�','ž',
'�','¹',
'�','º',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI8_B | show |
| +{
'�','ё',
'�','Ё',
'�','ю',
'�','а',
'�','б',
'�','ц',
'�','д',
'�','е',
'�','ф',
'�','г',
'�','х',
'�','и',
'�','й',
'�','к',
'�','л',
'�','м',
'�','н',
'�','о',
'�','п',
'�','я',
'�','р',
'�','с',
'�','т',
'�','у',
'�','ж',
'�','в',
'�','ь',
'�','ы',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleHebrew | show |
| +{
'�','Ä',
'�','ײַ',
'�','Ç',
'�','É',
'�','Ñ',
'�','Ö',
'�','Ü',
'�','á',
'�','à',
'�','â',
'�','ä',
'�','ã',
'�','å',
'�','ç',
'�','é',
'�','è',
'�','ê',
'�','ë',
'�','í',
'�','ì',
'�','î',
'�','ï',
'�','ñ',
'�','ó',
'�','ò',
'�','ô',
'�','ö',
'�','õ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI8_E | show |
| +{
'�',' ',
'�','ђ',
'�','ѓ',
'�','ё',
'�','є',
'�','ѕ',
'�','і',
'�','ї',
'�','ј',
'�','љ',
'�','њ',
'�','ћ',
'�','ќ',
'�','',
'�','ў',
'�','џ',
'�','№',
'�','Ђ',
'�','Ѓ',
'�','Ё',
'�','Є',
'�','Ѕ',
'�','І',
'�','Ї',
'�','Ј',
'�','Љ',
'�','Њ',
'�','Ћ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_8 | show |
| +{
'�',' ',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','×',
'�','«',
'�','¬',
'�','',
'�','®',
'�','‾',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','÷',
'�','»',
'�','¼',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleTurkish | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','º',
'�','»',
'�','¿',
'�','À',
'�','Á',
'�','Â',
'�','Ã',
'�','Ä',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1252 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','º',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleGreek | show |
| +{
'�',' ',
'�','£',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','²',
'�','³',
'�','·',
'�','¹',
'�','»',
'�','½',
'�','Ä',
'�','É',
'�','Ö',
'�','Ü',
'�','ß',
'�','à',
'�','â',
'�','ä',
'�','ç',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_2 | show |
| +{
'�',' ',
'�','Ą',
'�','˘',
'�','Ł',
'�','¤',
'�','Ľ',
'�','Ś',
'�','§',
'�','¨',
'�','Š',
'�','Ş',
'�','Ť',
'�','Ź',
'�','',
'�','Ž',
'�','Ż',
'�','°',
'�','ą',
'�','˛',
'�','ł',
'�','´',
'�','ľ',
'�','ś',
'�','ˇ',
'�','¸',
'�','š',
'�','ş',
'�','ť',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP949 | show |
| +{
'��','¡',
'��','¤',
'��','§',
'��','¨',
'��','ª',
'��','',
'��','®',
'��','°',
'��','±',
'��','²',
'��','³',
'��','´',
'��','¶',
'��','·',
'��','¸',
'��','¹',
'��','º',
'��','¼',
'��','½',
'��','¾',
'��','¿',
'��','Æ',
'��','Ð',
'��','×',
'��','Ø',
'�... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_10 | show |
| +{
'�',' ',
'�','Ą',
'�','Ē',
'�','Ģ',
'�','Ī',
'�','Ĩ',
'�','Ķ',
'�','§',
'�','Ļ',
'�','Đ',
'�','Š',
'�','Ŧ',
'�','Ž',
'�','',
'�','Ū',
'�','Ŋ',
'�','°',
'�','ą',
'�','ē',
'�','ģ',
'�','ī',
'�','ĩ',
'�','ķ',
'�','·',
'�','ļ',
'�','đ',
'�','š',
'�','ŧ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI8_A | show |
| +{
'$','¤',
'�','ю',
'�','а',
'�','б',
'�','ц',
'�','д',
'�','е',
'�','ф',
'�','г',
'�','х',
'�','и',
'�','й',
'�','к',
'�','л',
'�','м',
'�','н',
'�','о',
'�','п',
'�','я',
'�','р',
'�','с',
'�','т',
'�','у',
'�','ж',
'�','в',
'�','ь',
'�','ы',
'�','з',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::VISCII | show |
| +{
'','Ẳ',
'','Ẵ',
'','Ẫ',
'','Ỷ',
'','Ỹ',
' ','Ỵ',
'�','Ạ',
'�','Ắ',
'�','Ằ',
'�','Ặ',
'�','Ấ',
'�','Ầ',
'�','Ẩ',
'�','Ậ',
'�','Ẽ',
'�','Ẹ',
'�','Ế',
'�','Ề',
'�','Ể',
'�','Ễ',
'�','Ệ',
'�','Ố',
'�','Ồ',
'�','Ổ',
'�','Ỗ',
'�','Ộ',
'�','Ợ',
'�','Ớ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::EUC_JP | show |
| +{
'��','｡',
'��','｢',
'��','｣',
'��','､',
'��','･',
'��','ｦ',
'��','ｧ',
'��','ｨ',
'��','ｩ',
'��','ｪ',
'��','ｫ',
'��','ｬ',
'��','ｭ',
'��','ｮ',
'��','ｯ',
'��','ｰ',
'��','ｱ',
'��','ｲ',
'��','ｳ',
'��','ｴ',
'��','ｵ',
'��','ｶ',
'��','ｷ',
'��','ｸ',
'��','ｹ',
'�... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_6 | show |
| +{
'�',' ',
'�','¤',
'�','،',
'�','',
'�','؛',
'�','؟',
'�','ء',
'�','آ',
'�','أ',
'�','ؤ',
'�','إ',
'�','ئ',
'�','ا',
'�','ب',
'�','ة',
'�','ت',
'�','ث',
'�','ج',
'�','ح',
'�','خ',
'�','د',
'�','ذ',
'�','ر',
'�','ز',
'�','س',
'�','ش',
'�','ص',
'�','ض',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleIceland | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¥',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','º',
'�','»',
'�','¿',
'�','À',
'�','Á',
'�','Â',
'�','Ã',
'�','Ä',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_14 | show |
| +{
'�',' ',
'�','Ḃ',
'�','ḃ',
'�','£',
'�','Ċ',
'�','ċ',
'�','Ḋ',
'�','§',
'�','Ẁ',
'�','©',
'�','Ẃ',
'�','ḋ',
'�','Ỳ',
'�','',
'�','®',
'�','Ÿ',
'�','Ḟ',
'�','ḟ',
'�','Ġ',
'�','ġ',
'�','Ṁ',
'�','ṁ',
'�','¶',
'�','Ṗ',
'�','ẁ',
'�','ṗ',
'�','ẃ',
'�','Ṡ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::KOI_7 | show |
| +{
'$','¤',
'`','Ю',
'a','А',
'b','Б',
'c','Ц',
'd','Д',
'e','Е',
'f','Ф',
'g','Г',
'h','Х',
'i','И',
'j','Й',
'k','К',
'l','Л',
'm','М',
'n','Н',
'o','О',
'p','П',
'q','Я',
'r','Р',
's','С',
't','Т',
'u','У',
'v','Ж',
'w','В',
'x','Ь',
'y','Ы',
'z','З',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1253 | show |
| +{
'�',' ',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','®',
'�','°',
'�','±',
'�','²',
'�','³',
'�','µ',
'�','¶',
'�','·',
'�','»',
'�','½',
'�','ƒ',
'�','΄',
'�','΅',
'�','Ά',
'�','Έ',
'�','Ή',
'�','Ί',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP1254 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','º',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP932 | show |
| +{
'��','§',
'�N','¨',
'��','°',
'�}','±',
'�L','´',
'��','¶',
'�~','×',
'��','÷',
'��','Α',
'��','Β',
'��','Γ',
'��','Δ',
'��','Ε',
'��','Ζ',
'��','Η',
'��','Θ',
'��','Ι',
'��','Κ',
'��','Λ',
'��','Μ',
'��','Ν',
'��','Ξ',
'��','Ο',
'��','Π',
'��','Ρ',
'�... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_5 | show |
| +{
'�',' ',
'�','Ё',
'�','Ђ',
'�','Ѓ',
'�','Є',
'�','Ѕ',
'�','І',
'�','Ї',
'�','Ј',
'�','Љ',
'�','Њ',
'�','Ћ',
'�','Ќ',
'�','',
'�','Ў',
'�','Џ',
'�','А',
'�','Б',
'�','В',
'�','Г',
'�','Д',
'�','Е',
'�','Ж',
'�','З',
'�','И',
'�','Й',
'�','К',
'�','Л',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_1 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','º',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::CP950 | show |
| +{
'��','§',
'��','¯',
'�X','°',
'��','±',
'�P','·',
'��','×',
'��','÷',
'��','ˇ',
'��','ˉ',
'��','ˊ',
'��','ˋ',
'��','ˍ',
'��','˙',
'�D','Α',
'�E','Β',
'�F','Γ',
'�G','Δ',
'�H','Ε',
'�I','Ζ',
'�J','Η',
'�K','Θ',
'�L','Ι',
'�M','Κ',
'�N','Λ',
'�O','Μ',
'�... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleThai | show |
| +{
'�',' ',
'�','©',
'�','«',
'�','®',
'�','»',
'�','ก',
'�','ข',
'�','ฃ',
'�','ค',
'�','ฅ',
'�','ฆ',
'�','ง',
'�','จ',
'�','ฉ',
'�','ช',
'�','ซ',
'�','ฌ',
'�','ญ',
'�','ฎ',
'�','ฏ',
'�','ฐ',
'�','ฑ',
'�','ฒ',
'�','ณ',
'�','ด',
'�','ต',
'�','ถ',
'�','ท',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_7 | show |
| +{
'�',' ',
'�','ʽ',
'�','ʼ',
'�','£',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','«',
'�','¬',
'�','',
'�','―',
'�','°',
'�','±',
'�','²',
'�','³',
'�','΄',
'�','΅',
'�','Ά',
'�','·',
'�','Έ',
'�','Ή',
'�','Ί',
'�','»',
'�','Ό',
'�','½',
'�','Ύ',
'�','Ώ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_13 | show |
| +{
'�',' ',
'�','”',
'�','¢',
'�','£',
'�','¤',
'�','„',
'�','¦',
'�','§',
'�','Ø',
'�','©',
'�','Ŗ',
'�','«',
'�','¬',
'�','',
'�','®',
'�','Æ',
'�','°',
'�','±',
'�','²',
'�','³',
'�','“',
'�','µ',
'�','¶',
'�','·',
'�','ø',
'�','¹',
'�','ŗ',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::AppleCyrillic | show |
| +{
'�',' ',
'�','£',
'�','§',
'�','©',
'�','«',
'�','¬',
'�','®',
'�','°',
'�','±',
'�','µ',
'�','¶',
'�','»',
'�','÷',
'�','ƒ',
'�','Ё',
'�','Ђ',
'�','Ѓ',
'�','Є',
'�','Ѕ',
'�','І',
'�','Ї',
'�','Ј',
'�','Љ',
'�','Њ',
'�','Ћ',
'�','Ќ',
'�','Ў',
'�','Џ',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_9 | show |
| +{
'�',' ',
'�','¡',
'�','¢',
'�','£',
'�','¤',
'�','¥',
'�','¦',
'�','§',
'�','¨',
'�','©',
'�','ª',
'�','«',
'�','¬',
'�','',
'�','®',
'�','¯',
'�','°',
'�','±',
'�','²',
'�','³',
'�','´',
'�','µ',
'�','¶',
'�','·',
'�','¸',
'�','¹',
'�','º',
'�','»',
... |
| MHonArc-2.6.19 | MHonArc::UTF8::ISO8859_16 | show |
| +{
'�',' ',
'�','Ą',
'�','ą',
'�','Ł',
'�','€',
'�','„',
'�','Š',
'�','§',
'�','š',
'�','©',
'�','Ș',
'�','«',
'�','Ź',
'�','',
'�','ź',
'�','Ż',
'�','°',
'�','±',
'�','Č',
'�','ł',
'�','Ž',
'�','”',
'�','¶',
'�','·',
'�','ž',
'�','č',
'�','ș',
'�','»',
... |
| MRP-1.0 | MRP::Interface | show |
| $VERSION |
| MRP-1.0 | MRP::Introspection | show |
| $VERSION |
| MRP-1.0 | MRP::Text | show |
| $VERSION |
| MRP-1.0 | MRP::BaseClass | show |
| $VERSION |
| Mail-SPF-Test-v1.001 | Mail::SPF::Test | show |
| TRUE |
| Mail-SPF-Test-v1.001 | Mail::SPF::Test::Base | show |
| TRUE |
| Mail-SPF-Test-v1.001 | Mail::SPF::Test::Scenario | show |
| TRUE |
| Mail-SPF-Test-v1.001 | Mail::SPF::Test::Case | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Result | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Base | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mod | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::MacroString | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Server | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Exception | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Util | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Record | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Request | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Term | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::SenderIPAddrMech | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::Exists | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::IP6 | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::IP4 | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::PTR | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::All | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::Include | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::A | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mech::MX | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::v1::Record | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::v2::Record | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mod::Exp | show |
| TRUE |
| Mail-SPF-v2.9.0 | Mail::SPF::Mod::Redirect | show |
| TRUE |
| Mail-SpamCannibal-1.08 | Mail::SpamCannibal::DNSBLserver | show |
| $VERSION = do { q|char version[] = "dnsbls 0.55, 1-27-14";| =~ /(\d+)\.(\d+)/; sprintf("%d.%02d",$1,$2)} |
| Mail-SpamCannibal-1.08 | Mail::SpamCannibal::BDBaccess | show |
| $VERSION = do { q|char version[] = "bdbaccess 0.25, 1-14-14";| =~ /(\d+)\.(\d+)/; sprintf("%d.%02d",$1,$2)} |
| Markapl-FromHTML-0.03 | Markapl::FromHTML | show |
| def load($html) {
$self->{html} = $html;
$self;
}
def dump {
return $_ if (defined($_ = $self->{markapl}));
return $self->convert;
}
def convert {
return "" unless $self->{html};
my $p = HTML::PullParser->new(
... |
| Marpa-R2-8.000000 | Marpa::R2::HTML::Internal::Config::Default | show |
| $PRIMARY_GROUP_BY_TAG = {
'a' => 'GRP_inline',
'abbr' => 'GRP_inline',
'acronym' => 'GRP_inline',
'address' => 'GRP_block',
... |
| Mason-2.24 | Mason | show |
| method new ($class: %params) {
my $plugin_specs = delete( $params{plugins} ) || [];
my $base_interp_class = delete( $params{base_interp_class} )
|| $class->default_base_interp_class;
my @plugins = Mason::PluginManager->process_to... |
| Mason-2.24 | Mason::Component | show |
| method BUILD ($params) {
$self->{_orig_params} = $params;
weaken $self->{_orig_params}->{m};
}
method cmeta () {
return $self->can('_class_cmeta') ? $self->_class_cmeta : undef;
}
method _build_args () {
my $orig_params =... |
| Mason-2.24 | Mason::Plugin | show |
| method requires_plugins ($plugin_class:) {
return ();
}
method expand_to_plugins ($plugin_class:) {
return ( $plugin_class,
Mason::PluginManager->process_plugin_specs( [ $plugin_class->requires_plugins ] ) );
}
method get_roles_for... |
| Mason-2.24 | Mason::Filters::Standard | show |
| method Capture ($outref) {
sub { $$outref = $_[0]; return '' }
}
method CompCall ($path, @params) {
Mason::DynamicFilter->new(
filter => sub {
my $m = $self->m;
return $m->scomp( $path, @params, yield =... |
| Mason-2.24 | Mason::Test::Class | show |
| method setup_dirs () {
$self->{temp_dir} = join( "/", $self->{temp_root}, $temp_dir_count++ );
$self->{comp_root} = $self->{temp_dir} . "/comps";
$self->{data_dir} = $self->{temp_dir} . "/data";
mkpath( [ $self->{com... |
| Mason-2.24 | Mason::Plugin::Defer::Filters | show |
| method Defer () {
Mason::DynamicFilter->new(
filter => sub {
$self->m->defer( $_[0] );
}
);
}
1 |
| Mason-2.24 | Mason::Plugin::Defer::Request | show |
| method defer ($code) {
my $marker = $self->interp->_construct_distinct_string();
push( @{ $self->{defers} }, { marker => $marker, code => $code } );
return $marker;
}
method _apply_defers_to_request_buffer () {
if ( my @def... |
| Mason-Plugin-Cache-0.05 | Mason::Plugin::Cache::Filters | show |
| method Cache ( $key, $set_options, %cache_options ) {
$key = 'Default' if !defined($key);
Mason::DynamicFilter->new(
filter => sub {
$self->cache(%cache_options)->compute( $key, $_[0], $set_options );
}
... |
| Mason-Plugin-Cache-0.05 | Mason::Plugin::Cache::Component | show |
| method cache_memoized ($class:) {
$class = ref($class) || $class;
if (@_) { $memoized{$class} = $_[0] }
return $memoized{$class};
}
method cache_defaults ($class:) { $class->cmeta->interp->cache_defaults }
method cache_root_class (... |
| Mason-Plugin-Cache-0.05 | Mason::Plugin::Cache::Request | show |
| method cache () {
return $self->current_comp_class->cache(@_);
}
1 |
| Mason-Plugin-Cache-0.05 | Mason::Plugin::Cache::Interp | show |
| method _build_cache_defaults () {
return {
driver => 'File',
root_dir => catdir( $self->data_dir, 'cache' )
};
}
1 |
| Mason-Plugin-HTMLFilters-0.03 | Mason::Plugin::HTMLFilters::Filters | show |
| method HTMLPara () {
sub {
my $text = $_[0];
return "<p>\n" . join( "\n</p>\n\n<p>\n", split( /(?:\r?\n){2,}/, $text ) ) . "</p>\n";
};
}
method HTMLParaBreak () {
sub {
my $text = $_[0];
... |
| Mason-Plugin-PSGIHandler-0.06 | Mason::Plugin::PSGIHandler::Request | show |
| method redirect () {
$self->res->redirect(@_);
$self->clear_and_abort();
}
method not_found () {
$self->res->status(404);
$self->clear_and_abort();
}
1 |
| Mason-Plugin-PSGIHandler-0.06 | Mason::Plugin::PSGIHandler::Interp | show |
| method handle_psgi ($env) {
my $req = Mason::Plack::Request->new($env);
my $response = try {
$self->run( { req => $req }, $self->psgi_comp_path($req), $self->psgi_parameters($req) )
->plack_response;
}... |
| Mason-Plugin-RouterSimple-0.07 | Mason::Plugin::RouterSimple::Component | show |
| method allow_path_info ($class:) {
return $class->router_object ? 1 : 0;
}
method router_add ($class: $pattern, $dest) {
$dest ||= {};
unless ( $class->router_object ) {
$class->router_object( $class->router_create_object(... |
| Mason-Plugin-SliceFilter-0.05 | Mason::Plugin::SliceFilter::Filters | show |
| method Slice(%args){
return Mason::Plugin::SliceFilter::Filters::Slice->new(%args);
}
1 |
| Mason-Tidy-2.57 | Mason::Tidy | show |
| func validate_mason_version () {
die "must be 1 or 2" unless $_[0] =~ /^[12]$/;
}
method _build__is_mixed_block () {
return { map { ( $_, 1 ) } $self->mixed_block_names };
}
method _build__is_code_block () {
return { map { ( $_, 1 ) } $se... |
| Mason-Tidy-2.57 | Mason::Tidy::App | show |
| func usage ($msg) {
my $full_msg = ( $msg ? "$msg\n" : "" ) . $usage;
die $full_msg;
}
func version () {
my $version = $Mason::Tidy::VERSION || 'unknown';
print "masontidy $version on perl $] built for $Config{archname}\n";
exit;
}
m... |
| Math-Cartesian-Product-1.009 | Math::Cartesian::Product | show |
| $VERSION = '1.009' |
| Math-Disarrange-List-20170828 | Math::Disarrange::List | show |
| @EXPORT = qw(disarrange) |
| Math-Erf-Approx-0.002 | Math::Erf::Approx | show |
| caller(0) or __PACKAGE__->run_tests |
| Math-FFTW-0.01 | Math::FFTW | show |
| XSLoader::load('Math::FFTW', $VERSION) |
| Math-Permute-List-1.007 | Math::Permute::List | show |
| $VERSION = '1.007' |
| Math-Permute-Lists-20170828 | Math::Permute::Lists | show |
| @EXPORT = qw(permute) |
| Math-Permute-Partitions-1.001 | Math::Permute::Partitions | show |
| $VERSION = '1.001' |
| Math-Primality-0.08 | Math::Primality | show |
| exp(0) |
| Math-Primality-0.08 | Math::Primality::AKS | show |
| exp(0) |
| Math-Random-ISAAC-XS-1.004 | Math::Random::ISAAC::XS | show |
| XSLoader::load(__PACKAGE__, $Math::Random::ISAAC::XS::VERSION) |
| Math-Transform-List-20170824 | Math::Transform::List | show |
| @EXPORT = qw(transform) |
| MegaDistro-0.02-5 | MegaDistro | show |
| $VERSION = 0.02 |
| Memoize-1.03 | Memoize::AnyDBM_File | show |
| die "No DBM package was successfully found or installed" |
| Mildew-0.05 | VAST | show |
| class VAST::Base {
method emit_m0ld {
use Mildew::AST::Helpers;
if ($self->{infix}) {
my $name = $self->{infix}{SYM};
return fcall('&infix:'.$name,[map {$_->emit_m0ld} @{$self->{args}}]);
}
... |
| Mildew-0.05 | main | show |
| class Mildew::Frontend::STD {
use Getopt::Long qw(GetOptionsFromArray);
use Digest::MD4 qw(md4_hex);
has options=>(is=>'ro',default=>sub {{}});
has debug=>(is=>'rw',default=>0);
has setting=>(is=>'rw',default=&g... |
| Mildew-0.05 | VAST | show |
| class VAST::Base {
method emit_m0ld {
use Mildew::AST::Helpers;
if ($self->{infix}) {
my $name = $self->{infix}{SYM};
return fcall('&infix:'.$name,[map {$_->emit_m0ld} @{$self->{args}}]);
}
... |
| Mildew-0.05 | main | show |
| class Mildew::Frontend::STD {
use Getopt::Long qw(GetOptionsFromArray);
use Digest::MD4 qw(md4_hex);
has options=>(is=>'ro',default=>sub {{}});
has debug=>(is=>'rw',default=>0);
has setting=>(is=>'rw',default=&g... |
| Mildew-0.05 | VAST | show |
| class VAST::Base {
method emit_m0ld {
use Mildew::AST::Helpers;
if ($self->{infix}) {
my $name = $self->{infix}{SYM};
return fcall('&infix:'.$name,[map {$_->emit_m0ld} @{$self->{args}}]);
}
... |
| Mildew-0.05 | main | show |
| class Mildew::Frontend::STD {
use Getopt::Long qw(GetOptionsFromArray);
use Digest::MD4 qw(md4_hex);
has options=>(is=>'ro',default=>sub {{}});
has debug=>(is=>'rw',default=>0);
has setting=>(is=>'rw',default=&g... |
| Mite-v0.0.1 | Mite::Source | show |
| method has_class($name) {
return defined $self->classes->{$name};
}
method compile() {
return $self->compiled->compile();
}
method add_classes(@classes) {
for my $class (@classes) {
$self->classes->{$class->name}... |
| Mite-v0.0.1 | Mite::Attribute | show |
| method clone(%args) {
$args{name} //= $self->name;
$args{is} //= $self->is;
$args{default} = $self->default if !exists $args{default} and $self->has_default;
return $self->new(
%args
);
}
method has_dataref_... |
| Mite-v0.0.1 | Mite::Config | show |
| method make_mite_dir($dir=Path::Tiny->cwd) {
return path($dir)->child($self->mite_dir_name)->mkpath;
}
method write_config(HashRef $data=$self->data) {
$self->config_file->spew_utf8( $self->yaml_dump( $data ) );
return... |
| Mite-v0.0.1 | Mite::Project | show |
| method classes() {
my %classes = map { %{$_->classes} }
values %{$self->sources};
return \%classes;
}
method class($name) {
return $self->classes->{$name};
}
method source($file) {
return $self->sources-&... |
| Mite-v0.0.1 | Mite::ModuleBuild | show |
| method _mite() {
return $ENV{MITE} || 'mite';
}
method ACTION_code() {
system $self->_mite. " compile --exit-if-no-mite-dir --no-search-mite-dir";
return $self->SUPER::ACTION_code;
}
method ACTION_clean() {
system $self->_mite.... |
| Mite-v0.0.1 | Mite::Compiled | show |
| method compile() {
my $code;
for my $class (values %{$self->classes}) {
$code .= $class->compile;
}
return $code;
}
method write() {
return $self->file->spew_utf8($self->compile);
}
method remove() {
retur... |
| Mite-v0.0.1 | Mite::MakeMaker | show |
| method fix_pm_to_blib($from_dir, $to_dir) {
$from_dir = path($from_dir);
$to_dir = path($to_dir);
find({
wanted => sub {
return if -d $_ || !m{\.pm$};
my $src = path($File::Find::name);
my $ds... |
| Mite-v0.0.1 | Mite::Class | show |
| method project() {
return $self->source->project;
}
method class($name) {
return $self->project->class($name);
}
method _set_isa {
my $name = $self->name;
mro::set_mro($name, "c3");
no strict 'refs';
@{$name.'::IS... |
| Mite-v0.0.1 | Mite::App::Command | show |
| method opt_spec($class: $app) {
return(
[ "search-mite-dir!" => "only look for .mite/ in the current directory",
{ default => 1 } ],
[ "exit-if-no-mite-dir!" => "exit quietly if a .mite dir cannot be found",
{ defa... |
| Mite-v0.0.1 | Mite::App::Command::clean | show |
| method abstract() {
return "Remove compiled mite files";
}
method execute($opts, $args) {
return if $self->should_exit_quietly($opts);
require Mite::Project;
my $project = Mite::Project->default;
$project->clean_mites;
$... |
| Mite-v0.0.1 | Mite::App::Command::compile | show |
| method abstract() {
return "Make your code ready to run";
}
method execute($opts, $args) {
return if $self->should_exit_quietly($opts);
my $config = Mite::Config->new(
search_for_mite_dir => $opts->{search_mite_dir}
... |
| Mite-v0.0.1 | Mite::App::Command::init | show |
| method usage_desc(...) {
return "%c init %o <project name>";
}
method abstract() {
return "Begin using mite with your project";
}
method validate_args($opt, $args) {
$self->usage_error("init needs the name of your project") unless @... |
| Mite-v0.0.1 | Mite::Role::HasYAML | show |
| method yaml_load($yaml) {
require YAML::XS;
return YAML::XS::Load($yaml);
}
method yaml_dump($data) {
require YAML::XS;
return YAML::XS::Dump($data);
}
1 |
| Mite-v0.0.1 | Mite::Role::HasDefault | show |
| method default($class:) {
return $Defaults{$class} ||= $class->new;
}
method set_default($class: $new_default) {
$Defaults{$class} = $new_default;
return;
}
1 |
| Mo-0.40 | Mo | show |
| *{$M.import}=sub{import warnings;$^H|=1538;my($P,%e,%o)=caller.'::';shift;eval"no Mo::$_",&{$M.$_.::e}($P,\%e,\%o,\@_)for@_;return if$e{M};%e=(extends,sub{eval"no $_[0]()";@{$P.ISA}=$_[0]},has,sub{my$n=shift;my$m=sub{$#_?$_[0]{$n}=$_[1]:$_[0]{$n}};@_=(def... |
| Mo-0.40 | Mo::build | show |
| *{$M.'build::e'}=sub{my($P,$e)=@_;$e->{new}=sub{$c=shift;my$s=&{$M.Object::new}($c,@_);my@B;do{@B=($c.::BUILD,@B)}while($c)=@{$c.::ISA};exists&$_&&&$_($s)for@B;$s}} |
| Mo-0.40 | Mo::builder | show |
| *{$M.'builder::e'}=sub{my($P,$e,$o)=@_;$o->{builder}=sub{my($m,$n,%a)=@_;my$b=$a{builder}or return$m;my$i=exists$a{lazy}?$a{lazy}:!${$P.':N'};$i or ${$P.':E'}{$n}=\&{$P.$b}and return$m;sub{$#_?$m->(@_):!exists$_[0]{$n}?$_[0]{$n}=$_[0]->$b:$m->... |
| Mo-0.40 | Mo::coerce | show |
| *{$M.'coerce::e'}=sub{my($P,$e,$o)=@_;$o->{coerce}=sub{my($m,$n,%a)=@_;$a{coerce}or return$m;sub{$#_?$m->($_[0],$a{coerce}->($_[1])):$m->(@_)}};my$C=$e->{new}||*{$M.Object::new}{CODE};$e->{new}=sub{my$s=$C->(@_);$s->$_($s->{$_})... |
| Mo-0.40 | Mo::nonlazy | show |
| *{$M.'nonlazy::e'}=sub{${shift().':N'}=1} |
| Mo-0.40 | Mo::option | show |
| *{$M.'option::e'}=sub{my($P,$e,$o)=@_;$o->{option}=sub{my($m,$n,%a)=@_;$a{option}or return$m;my$n2=$n;*{$P."read_$n2"}=sub{$_[0]->{$n2}};sub{$#_?$m->(@_):$m->(@_,1);$_[0]}}} |
| Mo-0.40 | Mo::importer | show |
| *{$M.'importer::e'}=sub{my($P,$e,$o,$f)=@_;(my$pkg=$P)=~s/::$//;&{$P.'importer'}($pkg,@$f)if defined&{$P.'importer'}} |
| Mo-0.40 | Mo::required | show |
| *{$M.'required::e'}=sub{my($P,$e,$o)=@_;$o->{required}=sub{my($m,$n,%a)=@_;if($a{required}){my$C=*{$P."new"}{CODE}||*{$M.Object::new}{CODE};no warnings 'redefine';*{$P."new"}=sub{my$s=$C->(@_);my%a=@_[1..$#_];die$n." required"if!exists$a{$n};$s}}$m}... |
| Mo-0.40 | Mo::import | show |
| *{$M.import}=sub{(@_==2 and not$_[1])?pop@_:@_==1?push@_,grep!/import/,@f:();goto&$i} |
| Mo-0.40 | Mo::xs | show |
| *{$M.'xs::e'}=sub{my($P,$e,$o,$f)=@_;$P=~s/::$//;$e->{has}=sub{my($n,%a)=@_;Class::XSAccessor->import(class=>$P,accessors=>{$n=>$n})}if!grep!/^xs$/,@$f} |
| Mo-0.40 | Mo::default | show |
| *{$M.'default::e'}=sub{my($P,$e,$o)=@_;$o->{default}=sub{my($m,$n,%a)=@_;exists$a{default}or return$m;my($d,$r)=$a{default};my$g='HASH'eq($r=ref$d)?sub{+{%$d}}:'ARRAY'eq$r?sub{[@$d]}:'CODE'eq$r?$d:sub{$d};my$i=exists$a{lazy}?$a{lazy}:!${$P.':N'};$i or ... |
| Mo-0.40 | Mo::is | show |
| *{$M.'is::e'}=sub{my($P,$e,$o)=@_;$o->{is}=sub{my($m,$n,%a)=@_;$a{is}or return$m;sub{$#_&&$a{is}eq'ro'&&caller ne'Mo::coerce'?die$n.' is ro':$m->(@_)}}} |
| Mo-0.40 | Mo::chain | show |
| *{$M.'chain::e'}=sub{my($P,$e,$o)=@_;$o->{chain}=sub{my($m,$n,%a)=@_;$a{chain}or return$m;sub{$#_?($m->(@_),return$_[0]):$m->(@_)}}} |
| Mo-0.40 | Mo::exporter | show |
| *{$M.'exporter::e'}=sub{my($P)=@_;if(@{$M.EXPORT}){*{$P.$_}=\&{$M.$_}for@{$M.EXPORT}}} |
| Mo-xxx-0.12 | Mo::xxx | show |
| *{$MoPKG.'xxx::e'} = sub {
my ($caller_pkg, $exports) = @_;
$exports->{WWW} = sub {
require XXX;
local $XXX::DumpModule = $dm;
XXX::WWW(@_);
};
$exports->{XXX} = sub {
require XXX;
local $XXX::... |
| Mo-xxx-0.12 | Mo::xxx | show |
| *{$M.'xxx::e'}=sub{my($P,$e)=@_;$e->{WWW}=sub{require XXX;local$XXX::DumpModule=$dm;XXX::WWW(@_)};$e->{XXX}=sub{require XXX;local$XXX::DumpModule=$dm;XXX::XXX(@_)};$e->{YYY}=sub{require XXX;local$XXX::DumpModule=$dm;XXX::YYY(@_)};$e->{ZZZ}=sub... |
| Module-ConfigureRequires-0.03 | Module::ConfigureRequires | show |
| (undef) = (undef) |
| Module-Find-0.13 | ModuleFindTest | show |
| $ModuleFindTest::loaded = 1 |
| Module-Find-0.13 | ModuleFindTest::SubMod | show |
| $ModuleFindTest::SubMod::loaded = 1 |
| Module-Find-0.13 | ModuleFindTest::SubMod::SubSubMod | show |
| $ModuleFindTest::SubMod::SubSubMod::loaded = 1 |
| Module-Find-0.13 | ModuleFindTest | show |
| $ModuleFindTest::loaded = 1 |
| Module-Find-0.13 | ModuleFindTest::SubMod | show |
| $ModuleFindTest::SubMod::loaded = 1 |
| Module-Find-0.13 | ModuleFindTest::SubMod::SubSubMod | show |
| $ModuleFindTest::SubMod::SubSubMod::loaded = 1 |
| Mojito-0.25 | RenderMojoMojo | show |
| RenderMojoMojo->run_if_script |
| Mojito-0.25 | RecentSynopses | show |
| RecentSynopses->run_if_script |
| Mojolicious-Command-generate-qx_mojo_app-0.4.0 | package | show |
| <%= '__END__' %> |
| Mojolicious-Command-generate-qx_mojo_app-0.4.0 | package | show |
| <%= '__END__' %> |
| Mojolicious-Plugin-Kavorka-0.01 | Mojolicious::Plugin::Kavorka | show |
| method register ($app, $config) {
$app->hook(around_action => \&_around_action);
}
fun _around_action ($next, $c, $action, $last) {
if (my $info = Kavorka->info($action)) {
my $sig = $info->signature;
my @args;
for my $param (... |
| MonetDB-CLI-MapiXS-0.03 | MonetDB::CLI::MapiXS | show |
| XSLoader::load __PACKAGE__ |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::F5BIGIPGLOBALMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'F5-BIGIP-GLOBAL-MIB'} = {
gtmAttr2ForwardStatus => {
'0' => 'disabled',
'1' => 'enabled',
},
gtmAttr2Autosync => {
'0' => 'false',
'1' => 'true',
},
gt... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LIEBERTGPFLEXIBLEMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LIEBERT-GP-FLEXIBLE-MIB'} = {
lgpFlexibleEntryDataType => {
'0' => 'not-specified',
'1' => 'int16',
'2' => 'uint16',
'3' => 'int32',
'4' => 'uint32',
'... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::MIBDELL10892 | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'MIB-DELL-10892'} = {
DellNetworkDeviceTeamingFlags => {
'1' => 'noTeam',
'2' => 'teamingEnabled',
'4' => 'adapterFaultToleranceMode',
'8' => 'loadBalancingMode',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::NETSWITCHMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'NETSWITCH-MIB'} = {
hpSwitchSmartCardType => {
'1' => 'none',
'2' => 'fddi',
'3' => 'atm',
'4' => 'fddiAndATM',
'5' => 'other',
},
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::QUANTUMSNMPMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'QUANTUM-SNMP-MIB'} = {
TrapToggle => {
'1' => 'disabled',
'2' => 'enabled',
'3' => 'trapnotavailable',
},
DeviceState => {
'1' => 'unavailable',
'2' =&... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LIEBERTGPENVIRONMENTALMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LIEBERT-GP-ENVIRONMENTAL-MIB'} = {
lgpEnvConfigReheatAndHumidifierLockout => {
'1' => 'lockedOut',
'2' => 'notLockedOut',
},
lgpEnvConfigChillWaterControl => {
'1' =... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::IFMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'IFMIB'} = {
ifAdminStatus => {
'1' => 'up',
'2' => 'down',
'3' => 'testing',
},
ifLinkUpDownTrapEnable => {
'1' => 'enabled',
'2' => 'disabled',
}... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::GENUAMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'GENUA-MIB'} = {
State => {
'0' => 'notok',
'1' => 'ok',
'2' => 'unknown',
},
Ifstate => {
'0' => 'unknown',
'1' => 'down',
'2' =>... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOSTACKWISEMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-STACKWISE-MIB'} = {
cswStackPortOperStatus => {
'1' => 'up',
'2' => 'down',
'3' => 'forcedDown',
},
CswPowerStackMode => {
'1' => 'powerSharing',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::SWMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'SW-MIB'} = {
swNbIslState => {
'0' => 'sw-down',
'1' => 'sw-init',
'2' => 'sw-internal2',
'3' => 'sw-internal3',
'4' => 'sw-internal4',
'5' => 'sw-a... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOSBRNDMNG | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCOSB-RNDMNG'} = {
rlSysNameSource => {
'1' => 'dhcpv6',
'2' => 'dhcpv4',
'3' => 'static',
},
rlGroupMngQuery => {
'1' => 'query',
'2' => 'idle',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOLAGMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-LAG-MIB'} = {
ClagAggregationProtocol => {
'1' => 'lacp',
'2' => 'pagp',
},
ClagPortAdminStatus => {
'1' => 'off',
'2' => 'on',
'3' => 'active... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LIEBERTGPCONDITIONSMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LIEBERT-GP-CONDITIONS-MIB'} = {
lgpConditionCurrentState => {
'1' => 'active',
'2' => 'inactive',
},
lgpConditionType => {
'0' => 'not-specified',
'2' => '... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::ARISTAENTITYSENSORMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'ARISTA-ENTITY-SENSOR-MIB'} = {
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::WEBGRAPH8XTHERMOMETERMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'WebGraph-8xThermometer-MIB'} = {
wtWebioAn8GraphStTzStartWday => {
'1' => 'wtWebioAn8GraphStartWday-Sunday',
'2' => 'wtWebioAn8GraphStartWday-Monday',
'3' => 'wtWebioAn8... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOLWAPPAPMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-LWAPP-AP-MIB'} = {
cLApPwrInjectorSelection => {
'1' => 'unknown',
'2' => 'installed',
'3' => 'override',
},
cLApLegacyBeamForming => {
'1' => 'enabl... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LIEBERTGPPOWERMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LIEBERT-GP-POWER-MIB'} = {
lgpPwrAutomaticBatteryTest => {
'1' => 'on',
'2' => 'off',
},
lgpPwrUpsInverterStandby => {
'1' => 'on',
'2' => 'off',
},
lg... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::QUANTUMMIDRANGETAPELIBRARYMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'QUANTUM-MIDRANGE-TAPE-LIBRARY-MIB'} = {
VoltageType => {
'0' => 'unknown',
'1' => 'ac',
'2' => 'dc',
},
InterfaceMethod => {
'0' => 'unknown',
'1' =>... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::F5BIGIPSYSTEMMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'F5-BIGIP-SYSTEM-MIB'} = {
sysInterfaceEnabled => {
'0' => 'false',
'1' => 'true',
},
sysDot3StatDuplexStatus => {
'1' => 'unknown',
'2' => 'halfDuplex',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOSBTUNING | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCOSB-TUNING'} = {
rlBrgMacHashFunctionAfterReset => {
'0' => 'macSqnVlanSqn',
'1' => 'macRndVlanSqn',
'2' => 'macSqnVlanRnd',
'3' => 'macRndVlanRnd',
},
rl... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOPORTCHANNELMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-PORT-CHANNEL-MIB'} = {
PortChannelGroupMode => {
'1' => 'on',
'2' => 'active',
},
PortChannelMode => {
'1' => 'auto',
'2' => 'on',
'3' => 'off... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::DELLRACMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'DELL-RAC-MIB'} = {
DellStatus => {
'1' => 'other',
'2' => 'unknown',
'3' => 'ok',
'4' => 'nonCritical',
'5' => 'critical',
'6' => 'nonRecoverable',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::IANAIFTYPEMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'IANAIFTYPE-MIB'} = {
IANAifType => {
'1' => 'other',
'2' => 'regular1822',
'3' => 'hdh1822',
'4' => 'ddnX25',
'5' => 'rfc877x25',
'6' => 'ethernetCs... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CHECKPOINTMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CHECKPOINT-MIB'} = {
raTunnelAuthMethod => {
'1' => 'preshared-key',
'2' => 'dss-signature',
'3' => 'rsa-signature',
'4' => 'rsa-encryption',
'5' => 'rev-r... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOLWAPPHAMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-LWAPP-HA-MIB'} = {
cLHaSecondaryControllerUsageTrapType => {
'1' => 'usageStart',
'2' => 'usageComplete',
'3' => 'overUsage',
},
cLHaPowerSupply1Present => ... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LCOSMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LCOS-MIB'} = {
lcsSetupNetbiosNetworksEntryOperating => {
'0' => 'eNo',
'1' => 'eYes',
},
lcsSetupUtmCfProfCatProfEntryCinTvSocial => {
'0' => 'eAllowed',
'1'... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::MMBCOMMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'MMB-COM-MIB'} = {
tempSensorStatus => {
'1' => 'unknown',
'2' => 'not-available',
'3' => 'ok',
'5' => 'failed',
'6' => 'temperature-warning',
'7' =>... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::ETHERLIKEMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'EtherLike-MIB'} = {
dot3PauseOperMode => {
'1' => 'disabled',
'2' => 'enabledXmit',
'3' => 'enabledRcv',
'4' => 'enabledXmitAndRcv',
},
dot3StatsDuplexStatus ... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::F5BIGIPLOCALMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'F5-BIGIP-LOCAL-MIB'} = {
ltmDosApplicationLatencyBasedIpRateLimiting => {
'0' => 'false',
'1' => 'true',
},
ltmFastHttpProfileConnpoolReplenish => {
'0' => 'false... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::THEV01MIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'THE_V01-MIB'} = {
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::IDRACMIBSMIV2 | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'IDRAC-MIB-SMIv2'} = {
NMIButtonControlSettingsFlags => {
'1' => 'unknown',
'2' => 'enabled',
'4' => 'disabled',
},
HostControlCapabilitiesFlags => {
'1' =>... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LIEBERTGPPDUMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LIEBERT-GP-PDU-MIB'} = {
lgpPduAuxMeasCntctClosureState => {
'0' => 'not-specified',
'1' => 'open',
'2' => 'closed',
},
lgpPduRcpEntryLineSource => {
'0' =>... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::HOSTRESOURCESMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'HOST-RESOURCES-MIB'} = {
hrDeviceStatus => {
'1' => 'unknown',
'2' => 'running',
'3' => 'warning',
'4' => 'testing',
'5' => 'down',
},
hrSWInstalledTyp... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOSBSYSMNGMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCOSB-SYSMNG-MIB'} = {
SysmngPoolType => {
'1' => 'router',
'2' => 'iscsi',
'3' => 'voip',
'4' => 'misc',
},
SysmngResourceRouteUsageType => {
'1' =&... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::KYOCERAPRIVATEMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'KYOCERA-Private-MIB'} = {
kcprtMessageDataAttribute => {
'0' => 'notRegistered',
'1' => 'registered',
},
kcprtFirmwareUpdata => {
'3' => 'enabled',
'4' => ... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::ELTEXMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::mibs_and_oids->{'ELTEX-MIB'} = {
'eltexPowerSupplyTable' => '1.3.6.1.4.1.89.83.1.2',
'eltexPowerSupplyEntry' => '1.3.6.1.4.1.89.83.1.2.1',
'eltexPowerSupplyId' => '1.3.6.1.4.1.89.83.1.2.1.5',
'... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::STEELHEADMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'STEELHEAD-MIB'} = {
systemHealth => {
'10000' => 'healthy',
'30000' => 'degraded',
'31000' => 'admissionControl',
'50000' => 'critical',
},
optServiceStatus =... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::EMDMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'EMD-MIB'} = {
SensorStateEnumeration => {
'-1' => 'unavailable',
'0' => 'open',
'1' => 'closed',
'2' => 'belowLowerCritical',
'3' => 'belowLowerWarning',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::ADICTAPELIBRARYMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'ADIC-TAPE-LIBRARY-MIB'} = {
BladeState => {
'0' => 'unknown',
'1' => 'notReady',
'2' => 'booting',
'3' => 'autoleveling',
'4' => 'autolevelcomplete',
'... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::STEELHEADEXMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'STEELHEAD-EX-MIB'} = {
optServiceStatus => {
'0' => 'none',
'1' => 'unmanaged',
'2' => 'running',
'3' => 'sentCom1',
'4' => 'sentTerm1',
'5' => 'sen... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::STULZWIB8000 | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'STULZ-WIB8000'} = {
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::ENTITYSTATEMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'ENTITY-STATE-TC-MIB'} = {
EntityAdminState => {
1 => 'unknown',
2 => 'locked',
3 => 'shuttingDown',
4 => 'unlocked',
},
EntityOperState => {
1 => 'u... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::UCDDISKIOMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'UCD-DISKIO-MIB'} = {
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LEXMARKPVTMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LEXMARK-PVT-MIB'} = {
prtgenStatusInputEmpty => {
'1' => 'notEmpty',
'2' => 'empty',
'3' => 'unknown',
},
lexipxPortInfoBannerPage => {
'1' => 'off',
'... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LIEBERTGPREGISTRATIONMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LIEBERT-GP-REGISTRATION-MIB'} = {
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::FOUNDRYSNAGENTMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'FOUNDRY-SN-AGENT-MIB'} = {
snAgentConfigModule2MgmtModuleType => {
'1' => 'other',
'2' => 'nonManagementModule',
'3' => 'unknownManagementModule',
'4' => 'm1Manag... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::FIBRECHANNELFEMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'FIBRE-CHANNEL-FE-MIB'} = {
fcFxPortAdminMode => {
'2' => 'fPort',
'3' => 'flPort',
},
FcBbCreditModel => {
'1' => 'regular',
'2' => 'alternate',
},
fcF... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::MIBFILESYS | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'MIB-FILESYS'} = {
fsDiskCommand => {
'0' => 'none',
'1' => 'mount',
'2' => 'umount',
'3' => 'format',
},
fsDiskFsType => {
'0' => 'unkown',
'1' ... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LEXMARKMPSMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LEXMARK-MPS-MIB'} = {
CartridgeTypeTC => {
'1' => 'unknown',
'2' => 'other',
'3' => 'invalid',
'4' => 'shipWith',
'5' => 'standard',
'6' => 'highYie... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::NETSCREENNSRPMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'NETSCREEN-NSRP-MIB'} = {
nsrpTrackIpMethod => {
'0' => 'ping',
'1' => 'arp',
},
nsrpRtoUnitDirection => {
'1' => 'out',
'2' => 'in',
},
nsrpVsdIfMngWEB... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::DAMOCLESMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'DAMOCLES-MIB'} = {
tsAlarmDescr => {
'1' => 'inputStateAlarm',
'2' => 'temperatureOutOfRange',
'3' => 'maskStateAlarm',
},
UnitType => {
'0' => 'celsius',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::RMONMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'RMON-MIB'} = {
channelDataControl => {
'1' => 'on',
'2' => 'off',
},
alarmSampleType => {
'1' => 'absoluteValue',
'2' => 'deltaValue',
},
hostTopNRateB... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::POWERNETMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'PowerNet-MIB'} = {
upsAdvTestDiagnosticsResults => {
'1' => 'ok',
'2' => 'failed',
'3' => 'invalidTest',
'4' => 'testInProgress',
},
upsDiagPMLifetimeStatus =... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::BROTHERMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'BROTHER-MIB'} = {
brMediaFixTray2 => {
'1' => 'off',
'2' => 'regular',
'3' => 'thick',
'4' => 'thicker',
'5' => 'transparency',
'6' => 'thin',
'... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::XUPSMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'XUPS-MIB'} = {
xupsInputSource => {
'1' => 'other',
'2' => 'none',
'3' => 'primaryUtility',
'4' => 'bypassFeed',
'5' => 'secondaryUtility',
'6' => '... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOFIREWALLMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-FIREWALL-MIB'} = {
AccessEvent => {
'1' => 'other',
'2' => 'grant',
'3' => 'deny',
'4' => 'denyMult',
'5' => 'error',
},
GenericEvent => {
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOSTACKIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-STACK-MIB'} = {
vlanTrunkMappingType => {
'1' => 'reservedToNonReserved',
'2' => 'dot1qToisl',
},
sysConsolePrimaryLoginAuthentication => {
'1' => 'tacacs',... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOSBHWENVIROMENT | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCOSB-HWENVIROMENT'} = {
rlEnvMonSupplySource => {
'1' => 'unknown',
'2' => 'ac',
'3' => 'dc',
'4' => 'externalPowerSupply',
'5' => 'internalRedundant',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::JUNIPERIFMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'JUNIPER-IF-MIB'} = {
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::WEBGRAPHTHERMOHYGROBAROMETERUSMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'WebGraph-Thermo-Hygro-Barometer-US-MIB'} = {
wtWebGraphThermoBaroLoggerTimebase => {
'1' => 'wtWebGraphThermoBaroDatalogger-1Min',
'2' => 'wtWebGraphThermoBaroDatalogger-5Min',... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::PRINTERPORTMONITORMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'PRINTER-PORT-MONITOR-MIB'} = {
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::CISCOENHANCEDMEMPOOLMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'CISCO-ENHANCED-MEMPOOL-MIB'} = {
CempMemPoolTypes => {
'1' => 'other',
'2' => 'processorMemory',
'3' => 'ioMemory',
'4' => 'pciMemory',
'5' => 'fastMemory'... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::MIBRESOURCE | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'BIANCA-BRICK-MIBRES-MIB'} = {
memoryType => {
'1' => 'flash',
'2' => 'dram',
'3' => 'dpool',
},
} |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::LIEBERTGPSYSTEMMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'LIEBERT-GP-SYSTEM-MIB'} = {
lgpSysControlOperationOnOff => {
'1' => 'on',
'2' => 'off',
},
lgpSysAudibleAlarm => {
'1' => 'on',
'2' => 'off',
},
lgpSys... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::JUNIPERMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'JUNIPER-MIB'} = {
jnxFruState => {
'1' => 'unknown',
'2' => 'empty',
'3' => 'present',
'4' => 'ready',
'5' => 'announceOnline',
'6' => 'online',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::PRINTERMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'PRINTER-MIB'} = {
CodedCharSet => {
'1' => 'other',
},
PrtInputTypeTC => {
'1' => 'other',
'2' => 'unknown',
'3' => 'sheetFeedAutoRemovableTray',
'4' =... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::OLDCISCOINTERFACESMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'OLD-CISCO-INTERFACES-MIB'} = {
locIfFSIPcts => {
'1' => 'notAvailable',
'2' => 'up',
'3' => 'down',
},
locIfFSIPdsr => {
'1' => 'notAvailable',
'2' =&g... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::IEEE8023LAGMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'IEEE8023-LAG-MIB'} = {
dot3adAggPortDebugMuxState => {
'1' => 'detached',
'2' => 'waiting',
'3' => 'attached',
'4' => 'collecting',
'5' => 'distributing',
... |
| Monitoring-GLPlugin-3.0.2.6 | Monitoring::GLPlugin::SNMP::MibsAndOids::UCDSNMPMIB | show |
| $Monitoring::GLPlugin::SNMP::MibsAndOids::definitions->{'UCD-SNMP-MIB'} = {
UCDErrorFix => {
'0' => 'noError',
'1' => 'runFix',
},
UCDErrorFlag => {
'0' => 'noError',
'1' => 'error',
},
} |
| Moo-Google-0.03 | Moo::Google::Server | show |
| app->start |
| Moodle-0.03 | Moodle | show |
| method content() {
my $grammar;
my $driver = $self->driver;
my $migrator = $self->migrator;
if ($driver->isa('Mojo::Pg')) {
$grammar = 'postgres';
}
if ($driver->isa('Mojo::SQLite')) {
$grammar = 'sqlite';
}
if ($driv... |
| MooseX-ArrayRef-0.005 | MooseX::ArrayRef | show |
| [qw( Yeah baby yeah )] |
| MooseX-AttributeDocumented-0.1004 | MooseX::AttributeDocumented | show |
| Moose::Exporter->setup_import_methods(
class_metaroles => {
attribute => ['MooseX::AttributeDocumented::Meta::Attribute::Trait::Documented'],
},
) |
| MooseX-ClosedHash-0.003 | MooseX::ClosedHash | show |
| [qw( Yeah baby yeah )] |
| MooseX-CompileTime-Traits-1.102570 | MooseX::CompileTime::Traits | show |
| role MooseX::CompileTime::Traits {
use Moose::Util;
method import (ClassName $class: ArrayRef :$traits?) {
if(defined($traits))
{
my $meta = $class->meta;
if($meta->isa('Moose::Meta::Class') && $meta... |
| MooseX-DeclareX-Privacy-0.006 | MooseX::DeclareX::Privacy | show |
| $MooseX::DeclareX::Privacy::VERSION = '0.006' |
| MooseX-MultiMethods-0.10 | MooseX::MultiMethods | show |
| method BUILD ($args) {
$self->_dd_init_args($args);
}
method _build_dd_context {
return DDContext->new(%{ $self->_dd_init_args });
}
method import (ClassName $class:) {
my $setup_class = caller;
$class->setup_for($setup_class... |
| MooseX-MultiMethods-0.10 | MooseX::MultiMethods::Meta::Method | show |
| method initialize_body {
my $name = $self->name;
my $variant_table = $self->_variant_table;
return sub {
my ($args) = \@_;
my $result = $variant_table->find_variant($args)
|| Class::MOP::class_of... |
| MooseX-MultiObject-0.03 | MooseX::MultiObject::Role | show |
| requires 'get_managed_objects' |
| MooseX-MultiObject-0.03 | MooseX::MultiObject::Meta::Class | show |
| has 'set_attribute_name' => (
reader => 'get_set_attribute_name',
writer => 'set_set_attribute_name',
predicate => 'has_set_attribute_name',
isa => 'Str',
) |
| MooseX-Role-DBIC-0.01 | MooseX::Role::DBIC | show |
| role {
my $p = shift;
my $name = $p->schema_name;
my $desc = $p->schema_description;
my $acc_opts = $p->accessor_options;
my $clearer = sub { shift->${\"clear_${name}_schema"}() };
my $common_opts = su... |
| MooseX-Role-DBIx-Connector-0.11 | MooseX::Role::DBIx::Connector | show |
| role {
my $p = shift;
my $conn = $p->connection_name;
my $desc = $p->connection_description;
my $opts = $p->accessor_options;
has "${conn}_dsn" => (
documentation => "DBI dsn for connecting t... |
| MooseX-Role-JSONObject-v0.1.0 | MooseX::Role::JSONObject | show |
| method to_json()
{
return MooseX::Role::JSONObject::Util::meta_to_json(
$self, $self->meta);
}
method from_json($class:, HashRef $data)
{
my $cls = ref $class || $class;
my $meta = Class::MOP::Class->initialize($cls);
return MooseX::Role:... |
| MooseX-Role-JSONObject-v0.1.0 | MooseX::Role::JSONObject::Util | show |
| func identify_type(Any $val, Moose::Meta::Attribute $attr)
{
if (!$attr->has_type_constraint) {
if (!defined $val) {
die "MooseX::Role::JSONObject::SKIP\n";
} elsif (ref $val eq 'ARRAY') {
return ('array', '*');
} elsif (ref $val eq 'HASH'... |
| MooseX-Role-REST-Consumer-0.003 | MooseX::Role::REST::Consumer | show |
| role {
my $p = shift;
my $service_host = $p->service_host;
my $service_port = $p->service_port;
my $resource_path = $p->resource_path;
my $content_type = $p->content_type;
my $retry = ... |
| MooseX-Runnable-Fuse-0.02 | MooseX::Runnable::Fuse | show |
| role Filesystem::Fuse::Readable {
use MooseX::Types::Moose qw(HashRef ArrayRef Defined Int);
use MooseX::Types::Path::Class qw(File Dir);
use POSIX qw(ENOENT EISDIR);
require MooseX::Getopt;
has 'open_files' => (
traits ... |
| MooseX-Types-Vehicle-0.03 | MooseX::Types::Vehicle | show |
| coerce VIN17
, from Str , via {
my $vin = shift;
$vin =~ tr/qQoOiI/000011/;
$vin =~ s/\s+//g;
return uc($vin);
} |
| Music-Intervals-0.0507 | App | show |
| true |
| MySQL-ORM-0.10 | MySQL::ORM::Generate | show |
| method generate {
$self->trace;
my $schema = $self->_lite->get_schema;
my @tables = $schema->get_tables;
@tables = $self->_prune_tables( \@tables );
my %new;
$new{tables} = \@tables;
$new{namespace} = $self->namespace if $se... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::Common | show |
| method camelize ( Str $str ) {
my @a = split( /_+/, $str );
my @b = map { ucfirst $_ } @a;
return join '', @b;
}
method writer {
return $self->_writer;
}
method attribute_maker {
return $self->_attribute_maker;
}
method method_maker {
ret... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::MethodMaker | show |
| method make_method (Str :$name,
Str :$sig,
Str :$body ) {
my $text;
$text .= "method $name (\n";
if ($sig) {
$sig = trim $sig;
$text .= " $sig\n";
}
$text .= ") {\n";
if ($body) {
$body = trim $body;
$text .= "... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::Writer | show |
| method write_class (
Str :$file_name!,
Str :$class_name!,
ArrayRef :$use,
ArrayRef :$with,
ArrayRef :$extends,
ArrayRef :$attribs,
ArrayRef :$methods,
Bool :$overwrite = 1
) {
$self->trace;
if ( !$overwrite ) {
if ( -f $fi... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::AttributeMaker | show |
| method make_attribute (
Str :$name,
ArrayRef :$comments,
Str :$is,
Str :$isa,
Str :$trigger,
Str :$default,
Bool :$no_init_arg,
Bool :$lazy,
Str :$builder
) {
my $text;
$text .= "has $name => (\n";
... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::Class::Table | show |
| method generate {
$self->trace;
my @attr;
push @attr,
my $text = $self->attribute_maker->make_attribute(
name => 'table_name',
is => 'ro',
isa => 'Str',
no_init_arg => 1,
default => spr... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::Class::ResultClass | show |
| method generate {
$self->trace;
my @attr;
my @columns = $self->table->get_columns;
foreach my $col (@columns) {
push @attr,
$self->attribute_maker->make_attribute(
name => $col->name,
comments => $self-&g... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::Class::CustomRole | show |
| method generate {
$self->trace;
$self->writer->write_class(
file_name => $self->get_module_path,
class_name => $self->get_role_name,
use => [
'Modern::Perl', 'Moose::Role',
'Method::Signatures', "Data:... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::Class::Db | show |
| method generate {
$self->trace;
my @attr;
push @attr,
$self->attribute_maker->make_attribute(
name => 'db_name',
is => 'rw',
isa => 'Str',
no_init_arg => 1,
default => sprintf( "'%s'",... |
| MySQL-ORM-0.10 | MySQL::ORM::Generate::Class::ResultClassX | show |
| method generate {
$self->trace;
my @attr;
my %seen;
my @columns = $self->table->get_columns;
foreach my $column (@columns) {
$seen{ $column->name }++;
foreach my $table ( $self->table->get_parent_tables(column_name => $... |
| MySQL-Util-0.40 | MySQL::Util::Lite | show |
| method get_schema {
return my $schema = MySQL::Util::Lite::Schema->new(
name => $self->_util->get_dbname,
_util => $self->_util
);
}
method _build_util {
my %new;
$new{dsn} = $self->dsn if defined $self->dsn;
$new{u... |
| MySQL-Util-0.40 | MySQL::Util::Lite::Schema | show |
| method get_table (Str $name) {
my @tables = $self->get_tables;
foreach my $t (@tables) {
if ( $t->name eq $name ) {
return $t;
}
}
}
method get_tables {
return @{ $self->tables };
}
method _build_tables {
my $aref = $self->_... |
| MySQL-Util-0.40 | MySQL::Util::Lite::ForeignKey | show |
| method get_column_constraints {
return @{ $self->column_constraints };
}
method _build_column_constraints {
my $aref = $self->_util->get_constraint(
name => $self->name
);
my @cols;
foreach my $col (@$aref) {
push @cols, MyS... |
| MySQL-Util-0.40 | MySQL::Util::Lite::AlternateKey | show |
| method get_columns {
return @{ $self->columns };
}
method _build_columns {
my $aref = $self->_util->get_constraint( name => $self->name );
my @cols;
foreach my $col (@$aref) {
my $href = $self->_util->describe_column(
ta... |
| MySQL-Util-0.40 | MySQL::Util::Lite::Table | show |
| method get_fq_name {
return sprintf( '%s.%s', $self->schema_name, $self->name );
}
method get_parent_tables (Str :$column_name) {
if ($column_name) {
return $self->_get_column_parent_tables( column_name => $column_name );
}
else {
r... |
| MySQL-Util-0.40 | MySQL::Util::Lite::Column | show |
| method get_moose_type {
my $str;
my $type = $self->type;
if ( $type =~ /varchar/i ) {
$str = 'Str|HashRef';
}
elsif ( $type =~ /timestamp/i || $type =~ /datetime/i) {
$str = 'Str|HashRef';
}
elsif ( $type =~ /enum/i ) {
$str = 'Str|Hash... |
| MySQL-Util-0.40 | MySQL::Util::Lite::PrimaryKey | show |
| method get_columns {
return @{ $self->columns };
}
method is_autoinc {
my @cols = $self->get_columns();
if ( @cols == 1 ) {
my $col = shift @cols;
if ( $col->is_autoinc ) {
return 1;
}
}
return 0;
}
method _build_columns {
m... |
| MySQL-Util-0.40 | MySQL::Util::Lite::Roles::NewColumn | show |
| method new_column (HashRef $column_descript) {
my $col = $column_descript;
return MySQL::Util::Lite::Column->new(
name => $col->{FIELD},
key => $col->{KEY},
default => $col->{DEFAULT},
type =>... |
| Net-Address-IP-Local-0.1.2 | Net::Address::IP::Local | show |
| TRUE |
| Net-Autoconfig-v1.13.2 | Net::Autoconfig | show |
| TRUE |
| Net-Autoconfig-v1.13.2 | Net::Autoconfig::Template | show |
| TRUE |
| Net-Autoconfig-v1.13.2 | Net::Autoconfig::Device | show |
| TRUE |
| Net-Autoconfig-v1.13.2 | Net::Autoconfig::Device::HP4000 | show |
| TRUE |
| Net-Autoconfig-v1.13.2 | Net::Autoconfig::Device::Cisco | show |
| TRUE |
| Net-Autoconfig-v1.13.2 | Net::Autoconfig::Device::HP | show |
| TRUE |
| Net-CapsuleCRM-1.151910 | Net::CapsuleCRM | show |
| method endpoint_uri { return 'https://' . $self->target_domain . '/api/'; }
method _talk($command,$method,$content?) {
my $uri = URI->new($self->endpoint_uri);
$uri->path("api/$command");
$self->ua->credentials(
$uri->hos... |
| Net-DNS-Resolver-Programmable-0.009 | Net::DNS::Resolver::Programmable | show |
| TRUE |
| Net-Google-CalendarV3-0.16 | Net::Google::CalendarV3 | show |
| method _build_service {
WWW::JSON->new( base_url => 'https://www.googleapis.com/calendar/v3',
post_body_format => 'JSON',
( $self->has_auth || $self->has_token ? (authentication => $s... |
| Net-Google-CalendarV3-0.16 | Net::Google::CalendarV3::Date | show |
| method set (DateTime $dt, CBool $is_all_day) {
if ($is_all_day) {
$self->date($dt->ymd);
$self->clear_dateTime;
$self->clear_timeZone;
} else {
$self->dateTime($dt->iso8601);
$self->time... |
| Net-Google-CalendarV3-0.16 | Net::Google::CalendarV3::Event | show |
| method uid { $self->id }
multi method title ($title) {
$self->summary($title);
}
multi method title () {
$self->summary;
}
multi method content ($content) {
$self->description($content);
}
multi method content () {
$self-&g... |
| Net-IMP-HTTP-0.523 | Net::IMP::HTTP | show |
| push @EXPORT, IMP_DATA( 'httprq[http+10]',
'header' => +1,
'content' => -2,
'data' => -3,
) |
| Net-Ifstat-0.01 | Net::Ifstat | show |
| *exec = \&execute |
| Net-Jenkins-0.07 | Net::Jenkins | show |
| method get_base_url {
return $self->scheme
. '://' . $self->host
. ':' . $self->port;
}
method post_url ($uri,%args) {
return $self->user_agent->post( $uri , \%args );
}
method get_url ($uri) {
... |
| Net-Jenkins-0.07 | Net::Jenkins::Job | show |
| method delete {
return $self->api->delete_job( $self->name );
}
method update ($xml) {
return $self->api->update_job( $self->name, $xml );
}
method copy ($new_job_name) {
return $self->api->copy_job( $new_job_name , $... |
| Net-Jenkins-0.07 | Net::Jenkins::Job::Build | show |
| method details {
return $self->api->get_build_details( $self->job->name, $self->number );
}
method result {
return $self->details->{result};
}
method building {
return $self->details->{building};
}
method id {
... |
| Net-Nessus-0.09 | Net::Nessus::Message | show |
| @Net::Nessus::Message::BYE::ISA = qw(Net::Nessus::Message::SingleLine) |
| Net-Netcat-0.05 | Net::Netcat | show |
| *exec = \&execute |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->set_info("");
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->{blarray} ||= [];
substr($data{data}, 0, 3) = "";
substr($data{data}, -4, 4) = "" if $snac->{flags2};
push @{$session->{blarray}}, $data{data};
if($snac->{flags2}) {
$connection->log_printf(OSCAR_DBG_SIGNON, "Got buddylis... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->{__BLI_locked} = 0;
$session->callback_buddylist_changed(Net::OSCAR::_BLInternal::BLI_to_NO($session));
if($session->{__BLI_commit_later}) {
$session->{__BLI_commit_later} = 0;
$session->commit_buddylist();
}
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->{gotbl} = 1;
$session->{bl_limits}->{groups} = $data{maximums}->[1];
$session->{bl_limits}->{permits} = $data{maximums}->[2];
$session->{bl_limits}->{denies} = $data{maximums}->[3];
if($session->{bl_limi... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
if(!ref($session->{budmods}) || !@{$session->{budmods}}) {
$connection->log_print(OSCAR_DBG_WARN, "Unexpected blmod ack!");
return;
}
my $budmods = $session->{budmods};
$connection->log_print(OSCAR_DBG_DEBUG, "Got blmod ack (", sc... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->{__BLI_locked} = 1;
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
if($session->{gotbl}) {
delete $session->{gotbl};
$connection->log_print(OSCAR_DBG_WARN, "Couldn't get your buddylist - probably because you don't have one.");
got_buddylist($session, $connection);
} else {
$connection->log_print... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $type = "add";
%data = protoparse($session, "buddylist_change")->unpack($snac->{data});
foreach my $change (@{$data{changes}}) {
$connection->log_print_cond(OSCAR_DBG_DEBUG, sub { "Buddylist change $type:\n", Data::Dumper::Dumper($cha... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $type = "modify";
%data = protoparse($session, "buddylist_change")->unpack($snac->{data});
foreach my $change (@{$data{changes}}) {
$connection->log_print_cond(OSCAR_DBG_DEBUG, sub { "Buddylist change $type:\n", Data::Dumper::Dumper($... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $type = "delete";
%data = protoparse($session, "buddylist_change")->unpack($snac->{data});
foreach my $change (@{$data{changes}}) {
$connection->log_print_cond(OSCAR_DBG_DEBUG, sub { "Buddylist change $type:\n", Data::Dumper::Dumper($... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
return if exists($data{exchange});
foreach my $room (@{$data{room}}) {
my($reqid) = "";
$reqid = pack("n", 4);
$reqid .= randchars(2);
($reqid) = unpack("N", $reqid);
$session->{chats}->{$reqid} = $room;
$session->svcdo(CONNTYPE_... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
if($data{error}) {
my $error = $data{error};
$session->crapout($connection, "Invalid screenname.") if $error == 0x01;
$session->crapout($connection, "Invalid password.") if $error == 0x05;
$session->crapout($connection, "You've been co... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
if(defined($connection->{auth})) {
$connection->log_print(OSCAR_DBG_SIGNON, "Sending password.");
my(%signon_data) = signon_tlv($session, delete($connection->{auth}), $data{key});
$session->svcdo(CONNTYPE_BOS, protobit => "signon... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $error = "";
if($family == 0x4) {
$error = "Your message could not be sent for the following reason: ";
} else {
$error = "Error in ".$connection->{description}.": ";
}
$session->log_printf(OSCAR_DBG_DEBUG, "Got error %d on req 0x%04X/0x... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $sender = Net::OSCAR::Screenname->new(\$data{screenname});
my $sender_info = $session->{userinfo}->{$sender} ||= {};
if($data{channel} == 1) {
%data = protoparse($session, "standard_IM_footer")->unpack($data{message_body});
my $... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->callback_im_ok($reqdata, $reqid);
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
delete $session->{rv_proposals}->{$data{cookie}};
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->callback_typing_status(Net::OSCAR::Screenname->new(\$data{screenname}), $data{typing_status});
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $uin = $data{our_uin};
if($data{type} == 2010) {
$session->{icq_meta_info_cache}->{$uin} ||= {};
(%data) = protoparse($session, "ICQ_meta_info_response")->unpack($data{typedata});
if($data{status} != 10) {
delete $session->{ic... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->callback_admin_ok(ADMIN_TYPE_ACCOUNT_CONFIRM);
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $reqdesc = "";
$data{subrequest} ||= 0;
if($data{request_type} == 2) {
$reqdesc = ADMIN_TYPE_PASSWORD_CHANGE;
} elsif($data{request_type} == 3) {
if(exists($data{new_email})) {
$reqdesc = ADMIN_TYPE_EMAIL_CHANGE;
} else {
$reqdesc = ADMIN... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->postprocess_userinfo(\%data);
$session->callback_buddy_info($data{screenname}, \%data);
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->callback_chat_joined($connection->{name}, $connection) unless $connection->{sent_joined}++;
$session->callback_chat_buddy_in(Net::OSCAR::Screenname->new(\$_->{screenname}), $connection) foreach @{$data{occupants}};
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->callback_chat_im_in($data{sender}, $connection, $data{message});
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
foreach (@{$data{departures}}) {
$session->callback_chat_buddy_out(Net::OSCAR::Screenname->new(\$_), $connection);
}
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
foreach (@{$data{arrivals}}) {
$session->callback_chat_buddy_in(Net::OSCAR::Screenname->new(\$_->{screenname}), $connection, $_);
}
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->callback_buddy_icon_uploaded();
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $screenname = $data{screenname};
my $user_info = $session->{userinfo}->{$screenname} ||= {};
$user_info->{icon_checksum} = $data{checksum};
$user_info->{icon} = $data{icon};
$session->callback_buddy_icon_downloaded($user_info->... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
if($session->{bl_limits}->{buddies}) {
if($data{maxbuddies} < $session->{bl_limits}->{buddies}) {
$session->{bl_limits}->{buddies} = $data{maxbuddies};
}
} else {
$session->{bl_limits}->{buddies} = $data{maxbuddies};... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $buddy = $data{screenname};
my($grpname, $group) = $session->findbuddy($buddy);
return unless $grpname;
delete $session->{userinfo}->{$buddy};
my $budinfo = $group->{members}->{$buddy};
foreach (keys %$budinfo) {
delete $budi... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$connection->log_print(OSCAR_DBG_DEBUG, "Incoming bogey - er, I mean buddy - $data{screenname}");
$session->postprocess_userinfo(\%data);
my $screenname = $data{screenname};
my($grpname, $group) = $session->findbuddy($screenname);
return ... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my($rate, $worrisome);
if($session->{rate_manage_mode} != OSCAR_RATE_MANAGE_NONE) {
delete $data{message_type};
my $cinfo = $connection->{rate_limits}->{$data{class_id}};
$cinfo->{$_} = $data{$_} foreach keys(%data);
}
if($data{c... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$connection->log_print(OSCAR_DBG_WARN, "Migration cancelled by server!");
$connection->unpause();
$connection->loglevel(delete $connection->{__old_loglevel});
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->{__old_loglevel} = $session->loglevel();
$session->loglevel(10);
$connection->log_print(OSCAR_DBG_WARN, "Server initiated migration. Migration support is experimental. Please tell matthewg\@zevils.com that this happened and ... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->{ip} = $data{ip} if $data{ip};
if(exists($data{stealth_status})) {
my $stealth_state;
if($data{stealth_status} & 0x100) {
$stealth_state = 1;
} else {
$stealth_state = 0;
}
if($stealth_state xor $session->{stealth}) {
$... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$session->callback_evil($data{new_level} / 10, Net::OSCAR::Screenname->new(\$data{screenname}) || undef);
} |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my $conntype;
my %chatdata;
my $svctype = $data{service_type};
my $svcmap = tlv();
$svcmap->{$_} = $_ foreach (CONNTYPE_LOGIN, CONNTYPE_CHATNAV, CONNTYPE_CHAT, CONNTYPE_ADMIN, CONNTYPE_BOS, CONNTYPE_ICON);
$conntype = $svcmap->{$svctype} ||... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
if(exists($data{upload_checksum})) {
if($connection->{conntype} != CONNTYPE_ICON) {
if($session->{icon} and $session->{is_on}) {
$connection->log_print(OSCAR_DBG_INFO, "Uploading buddy icon.");
$session->svcdo(CONNTYPE_ICON,... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$connection->unpause();
if($session->{rate_manage_mode} != OSCAR_RATE_MANAGE_NONE) {
$connection->{rate_limits} ||= {classmap => {}};
my $rinfo = $connection->{rate_limits};
my $time = millitime();
foreach my $class (@{$data{cl... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
my @migfamilies = grep { $_ != 0 } @{$data{families}};
$connection->log_print(OSCAR_DBG_WARN, "Migration families received: ", join(" ", @migfamilies));
$session->loglevel(10);
my $pause_queue;
if(@{$data{families}} == keys %{$connection-&g... |
| Net-OSCAR-1.928 | Net::OSCAR::Callbacks | show |
| sub {
$connection->{families} = { map { $_ => 1 } @{$data{families}} };
send_versions($connection, 0);
$connection->proto_send(protobit => "rate_info_request", nopause => 1);
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(protobit => "BOS_rights_response", reqid => $reqid);
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
my $blist;
my $visdata = tlv_encode(tlv(
0xCA => 0,
0xCB => 0xFFFFFFFF,
));
$blist = "xxx";
$blist .= pack("n5a*", 0, 0, 0xCB, 4, length($visdata), $visdata);
$blist .= pack("na*n4", length("Buddies"), "Buddies", 1, 0, 1, 0);
my $i = 1;
$b... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(protobit => "buddylist_3_response", reqid => $reqid, protodata => {maximums => [
200, 50, 128, 128, 1, 1, 50, 0, 0, 3, 0, 0, 0, 128, 128, 20, 200, 1, 0, 1, 0
]});
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
my $hash;
($screenname, $hash) = ($data{screenname}, $data{auth_response});
if(!$SCREENNAMES->{$screenname}) {
$connection->proto_send(protobit => "authorization_response", protodata => {error => 1});
}
my @valid_hashes = map {
[... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
if(exists($SCREENNAMES->{$data{screenname}})) {
$screenname = $data{screenname};
my $key = sprintf("%08d", int(rand(99999999)));
print "$screenname would like to sign on. Generated key '$key'\n";
$SESSIONS->{$screenname} ||= {};
$SESSI... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
my $cookie = pack("n", $reqid & 0xFFFF) . $data{cookie};
if($COOKIES{$cookie}) {
my $peer = delete $COOKIES{$cookie};
my $screenname = $peer->{sn};
print "$screenname initiating BOS handshake.\n";
$connection->{screenname} = $screenname;
... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(protobit => "IM_parameter_response", reqid => $reqid, protodata => {channel => $data{channel}});
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
my $target = $SESSIONS->{$data{screenname}};
if(!$target or !$target->{sessions}->[0]) {
return srv_send_error($connection, $family, 4);
}
$connection->proto_send(reqid => $reqid, protobit => "IM_acknowledgement", protodata =>... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(protobit => "IM_parameter_response", reqid => $reqid, protodata => {channel => $data{channel}});
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(protobit => "locate_rights_response", reqid => $reqid);
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(reqid => $reqid, protobit => "incoming_profile", protodata => {
screenname => $data{screenname},
awaymsg => "Got away message at " . scalar(ctime(time())),
evil => 0,
flags => 0x20,
onsince =>... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(protobit => "buddy_rights_response", reqid => $reqid);
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(reqid => $reqid, protobit => "self_information", protodata => {
screenname => $screenname,
evil => 0,
flags => 0x20,
onsince => time(),
idle => 0,
session_length => 0,
ip => 0
});
... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
if($data{status_message}) {
$SESSIONS->{$screenname}->{status}->{extstatus} = $data{status_message}->{message};
} elsif($data{stealth}) {
$SESSIONS->{$screenname}->{status}->{stealth} = $data{stealth}->{state} & 0x100;
}
... |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
send_versions($connection, 0, 1);
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
print "$screenname finished signing on.\n";
$connection->{signon_done} = 1;
} |
| Net-OSCAR-1.928 | Net::OSCAR::ServerCallbacks | show |
| sub {
$connection->proto_send(reqid => $reqid, protobit => "rate_info_response", protodata => {
classes => [],
classmembers => []
});
} |
| Net-OpenID-Server-1.09 | Net::OpenID::Server | show |
| *rand_chars = \&_rand_chars |
| Net-PSYC-0.21 | Net::PSYC::FileShare | show |
| %method = (
'_data_file' => sub {
my ($source, $mc, $data, $vars) = @_;
my $filename = $vars->{'_name_file'};
my $hash = $vars->{'_hash'};
my $t;
my $seek = int($vars->{'_seek_resume'});
my $size = int($vars->{'_siz... |
| Net-RocketChat-0.002 | Net::RocketChat | show |
| method BUILD($x) {
$self->username or $self->username($ENV{ROCKETCHAT_USERNAME});
$self->password or $self->password($ENV{ROCKETCHAT_PASSWORD});
$self->server or $self->server($ENV{ROCKETCHAT_SERVER});
$self->ua(LWP::UserA... |
| Net-SAML2-0.17 | Saml2Test | show |
| true |
| Net-SMS-O2-0.020 | Net::SMS::Genie | show |
| @ISA = qw( Net::SMS::O2 ) |
| Net-Stomp-MooseHelpers-3.0 | Net::Stomp::MooseHelpers::Types | show |
| coerce Permissions,
from OctalPermissions,
via { oct($_) } |
| Net-Stripe-0.39 | Net::Stripe::Resource | show |
| method form_fields_for_metadata {
my $metadata = $self->metadata();
my @metadata = ();
while( my($k,$v) = each(%$metadata) ) {
push @metadata, 'metadata['.$k.']';
push @metadata, $v;
}
return @metadata;
}
method fields_... |
| Net-Topsy-0.03 | Net::Topsy | show |
| class Net::Topsy with Net::Topsy::Role::API {
use Carp qw/croak confess/;
use Moose;
use URI::Escape;
use JSON::Any qw/XS DWIW JSON/;
use Data::Dumper;
use LWP::UserAgent;
use Net::Topsy::Result;
our $VERSION = '0.03';
... |
| Net-Topsy-0.03 | Net::Topsy::Result | show |
| class Net::Topsy::Result {
use MooseX::Iterator;
use Data::Dumper;
use namespace::autoclean;
has perl => ( isa => 'HashRef', is => 'rw', default => sub { [ ] } );
has json => ( isa => 'Str', ... |
| NetSNMP-Sendmail-0.95 | NetSNMP::Sendmail | show |
| registerAgent($agent, '.1.3.6.1.4.1.9163.100', $oidtable) |
| Number-MuPhone-0.07 | Number::MuPhone::Data | show |
| %Number::MuPhone::Data::NANP_areas = (
(
map { $_ => 'CA' } qw(
204 226 236 249 250 289 306 343 365 403 416 418 431 437 438 450 506
514 519 548 579 581 587 604 613 639 647 705 709 778 780 782 807 819
825 867 873 902 905 600 622 ... |
| Number-Phone-3.5001 | Number::Phone::Country::Data | show |
| $Number::Phone::Country::prefix_codes{AQ} = ['672', '0011', undef, qr/\A 0011 /xms] |
| Number-Phone-3.5001 | Number::Phone::NANP::Data | show |
| $mobile_regexes{VG} = '284496[6-9]\d{3}|284(?:3(?:0[0-3]|4[0-7]|68|9[34])|4(?:4[0-6]|68|99)|54[0-57])\d{4}' |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-InsideOut-4.05 | Object::InsideOut | show |
| ($Object::InsideOut::VERSION eq '4.05')
or die("Version mismatch\n") |
| Object-Result-0.000003 | Object::Result | show |
| func _croak (@msg) {
require Carp;
Carp::croak( @msg );
}
method _croak_failure (:$errmsg, :$msg) {
state $TRAILING_AT_LINE
= qr{ \s++ at \s++ .+? \s++ line \s++ \d++ [\s\S]*+ \Z }xms;
require Carp;
local $Carp::CarpLevel = 1... |
| OpenGL-QEng-0.27 | OpenGL::QEng::Thing | show |
| {;
my %deflt_cache;
sub not_default {
my ($self) = @_;
unless (exists $deflt_cache{ref $self}) {
$deflt_cache{ref $self} = ref($self)->new(no_events=>1);
}
my $dflt = $deflt_cache{ref $self};
my $href = {};
for my $key (k... |
| OpenGL-QEng-0.27 | OpenGL::QEng::Control | show |
| {;
my %BUTS =
('move' =>
[['go_forward', 0,1,['step',0.3,0.0], '<Up>', 'repeat'],
['go_back', 2,1,['step',0.3,180.0],'<Down>', 'repeat'],
['turn_right', 0,2,['turn',+90], '<Right>', ... |
| OpenGL-QEng-0.27 | OpenGL::QEng::GUIThing | show |
| {;
my $textList;
sub pickTexture {
my ($self,$key) = @_;
unless (defined $textList) {
my $idir = File::ShareDir::dist_dir('Games-Quest3D');
$idir .= '/images';
$textList = OpenGL::QEng::TextureList->new($idir);
}
$textLis... |
| OpenGL-QEng-0.27 | OpenGL::QEng::OUtil | show |
| {;
my $classname = 'XAAAAA';
sub wrap_class {
my ($self) = @_;
my $class = $classname++;
{
no strict 'refs';
push @{"$class\::ISA"}, ref($self);
unless (ref $self->{wrap_class} eq 'HASH') {
my $cmdTxt = '$self->{w... |
| OpenGL-QEng-0.27 | OpenGL::QEng::BarDoor | show |
| {;
my $dl = 0;
my $chkErr = 0;
sub draw {
my ($self,$mode) = @_;
my $mdl = $self->model();
if ($mode == OpenGL::GL_SELECT) {
glLoadName($self->{GLid});
}
glTranslatef($self->{x},$self->y,$self->{z});
glRotate... |
| OpenGL-QEng-0.27 | OpenGL::QEng::Treasure | show |
| {;
my $dl = 0;
sub draw {
my ($self,$mode) = @_;
if ($mode == OpenGL::GL_SELECT) {
OpenGL::glLoadName($self->{GLid});
}
if ($self->texture ne 'coins') {
$self->SUPER::draw(@_);
return;
}
OpenGL::glTranslatef($... |
| OpenGL-QEng-0.27 | OpenGL::QEng::GameState | show |
| {;
my $lastx = -999;
my $lastz = -999;
my $lastdir = -999;
my $lastdist = 0;;
sub performStep {
my ($self,$stash,$team,$ev,$steps,$speed,$direction) = @_;
return unless defined $self->{cmap};
if ($speed < 0) {
$direction... |
| OpusVL-AppKit-2.29 | OpusVL::AppKit::View::JSON | show |
| __PACKAGE__->config(
expose_stash => 'json',
) |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::Aclrule | show |
| __PACKAGE__->setup_authdb |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::ParameterDefault | show |
| __PACKAGE__->belongs_to(
"parameter",
"OpusVL::AppKit::Schema::AppKitAuthDB::Result::Parameter",
{ id => "parameter_id" },
{ on_delete => "CASCADE", on_update => "CASCADE" },
) |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::AclruleRole | show |
| __PACKAGE__->belongs_to(
"aclrule",
"OpusVL::AppKit::Schema::AppKitAuthDB::Result::Aclrule",
{ id => "aclrule_id" },
{ on_delete => "CASCADE", on_update => "CASCADE" },
) |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::Parameter | show |
| __PACKAGE__->setup_authdb |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::UsersData | show |
| __PACKAGE__->belongs_to(
"user",
"OpusVL::AppKit::Schema::AppKitAuthDB::Result::User",
{ id => "users_id" },
{ on_delete => "CASCADE", on_update => "CASCADE" },
) |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::UsersParameter | show |
| __PACKAGE__->belongs_to(
"user",
"OpusVL::AppKit::Schema::AppKitAuthDB::Result::User",
{ id => "users_id" },
{ on_delete => "CASCADE", on_update => "CASCADE" },
) |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::Role | show |
| __PACKAGE__->setup_authdb |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::UsersRole | show |
| __PACKAGE__->belongs_to(
"user",
"OpusVL::AppKit::Schema::AppKitAuthDB::Result::User",
{ id => "users_id" },
{ on_delete => "CASCADE", on_update => "CASCADE" },
) |
| OpusVL-AppKit-Schema-AppKitAuthDB-6 | OpusVL::AppKit::Schema::AppKitAuthDB::Result::User | show |
| __PACKAGE__->setup_authdb |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::helveticaoblique | show |
| $FONTDATA = {
'fontname' => 'Helvetica-Oblique',
'type' => 'Type1',
'apiname' => 'HeIt',
'ascender' => '718',
'capheight' => '718',
'descender' => '-207',
'iscore' => '1',
'isfixedpitch' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::trebuchetbold | show |
| $FONTDATA = {
'fontname' => 'TrebuchetMS,Bold',
'type' => 'TrueType',
'apiname' => 'TrBo',
'ascender' => '938',
'capheight' => '715',
'descender' => '-222',
'isfixedpitch' => '0',
'issymbol' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::timesroman | show |
| $FONTDATA = {
'fontname' => 'Times-Roman',
'type' => 'Type1',
'apiname' => 'TiRo',
'ascender' => '683',
'capheight' => '662',
'descender' => '-217',
'iscore' => '1',
'isfixedpitch' => '0',
'itali... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::symbol | show |
| $FONTDATA = {
'fontname' => 'Symbol',
'type' => 'Type1',
'apiname' => 'Sym',
'ascender' => '600',
'capheight' => '600',
'descender' => '-200',
'iscore' => '1',
'isfixedpitch' => '0',
'issymbol' =... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::georgiabold | show |
| $FONTDATA = {
'fontname' => 'Georgia,Bold',
'type' => 'TrueType',
'apiname' => 'GeBo',
'ascender' => '916',
'capheight' => '692',
'descender' => '-219',
'isfixedpitch' => '0',
'issymbol' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::helveticabold | show |
| $FONTDATA = {
'fontname' => 'Helvetica-Bold',
'type' => 'Type1',
'apiname' => 'HeBo',
'ascender' => '718',
'capheight' => '718',
'descender' => '-207',
'iscore' => '1',
'isfixedpitch' => '0',
'it... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::georgiabolditalic | show |
| $FONTDATA = {
'fontname' => 'Georgia,BoldItalic',
'type' => 'TrueType',
'apiname' => 'GeBoIt',
'ascender' => '916',
'capheight' => '692',
'descender' => '-219',
'isfixedpitch' => '0',
'issymbol' => '... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::georgia | show |
| $FONTDATA = {
'fontname' => 'Georgia',
'type' => 'TrueType',
'apiname' => 'Geor',
'ascender' => '916',
'capheight' => '692',
'descender' => '-219',
'isfixedpitch' => '0',
'issymbol' => '0',
'ital... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::courierboldoblique | show |
| $FONTDATA = {
'fontname' => 'Courier-BoldOblique',
'type' => 'Type1',
'apiname' => 'CoBoIt',
'ascender' => '629',
'capheight' => '562',
'descender' => '-157',
'iscore' => '1',
'isfixedpitch' => '1',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::courier | show |
| $FONTDATA = {
'fontname' => 'Courier',
'type' => 'Type1',
'apiname' => 'Cour',
'ascender' => '629',
'capheight' => '562',
'descender' => '-157',
'iscore' => '1',
'isfixedpitch' => '1',
'italicang... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::verdanabold | show |
| $FONTDATA = {
'fontname' => 'Verdana,Bold',
'type' => 'TrueType',
'apiname' => 'VeBo',
'ascender' => '1005',
'capheight' => '727',
'descender' => '-209',
'isfixedpitch' => '0',
'issymbol' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::zapfdingbats | show |
| $FONTDATA = {
'fontname' => 'ZapfDingbats',
'type' => 'Type1',
'apiname' => 'Zapf',
'ascender' => '806',
'capheight' => '705',
'descender' => '-198',
'iscore' => '1',
'isfixedpitch' => '0',
'issy... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::verdana | show |
| $FONTDATA = {
'fontname' => 'Verdana',
'type' => 'TrueType',
'apiname' => 'Verd',
'ascender' => '1005',
'capheight' => '727',
'descender' => '-209',
'isfixedpitch' => '0',
'issymbol' => '0',
'ita... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::helveticaboldoblique | show |
| $FONTDATA = {
'fontname' => 'Helvetica-BoldOblique',
'type' => 'Type1',
'apiname' => 'HeBi',
'ascender' => '718',
'capheight' => '718',
'descender' => '-207',
'iscore' => '1',
'isfixedpitch' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::verdanaitalic | show |
| $FONTDATA = {
'fontname' => 'Verdana,Italic',
'type' => 'TrueType',
'apiname' => 'VeIt',
'ascender' => '1005',
'capheight' => '727',
'descender' => '-209',
'isfixedpitch' => '0',
'issymbol' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::bankgothic | show |
| $FONTDATA = {
'fontname' => 'BankGothicMediumBT',
'type' => 'TrueType',
'apiname' => 'BaGo',
'ascender' => '812',
'capheight' => '517',
'descender' => '-235',
'isfixedpitch' => '0',
'issymbol' => '0'... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::helvetica | show |
| $FONTDATA = {
'fontname' => 'Helvetica',
'type' => 'Type1',
'apiname' => 'Helv',
'ascender' => '718',
'capheight' => '718',
'descender' => '-207',
'iscore' => '1',
'isfixedpitch' => '0',
'italica... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::trebuchetitalic | show |
| $FONTDATA = {
'fontname' => 'TrebuchetMS,Italic',
'type' => 'TrueType',
'apiname' => 'TrIt',
'ascender' => '938',
'capheight' => '715',
'descender' => '-222',
'isfixedpitch' => '0',
'issymbol' => '0'... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::timesbolditalic | show |
| $FONTDATA = {
'fontname' => 'Times-BoldItalic',
'type' => 'Type1',
'apiname' => 'TiBoIt',
'ascender' => '683',
'capheight' => '669',
'descender' => '-217',
'iscore' => '1',
'isfixedpitch' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::georgiaitalic | show |
| $FONTDATA = {
'fontname' => 'Georgia,Italic',
'type' => 'TrueType',
'apiname' => 'GeIt',
'ascender' => '916',
'capheight' => '692',
'descender' => '-219',
'isfixedpitch' => '0',
'issymbol' => '0',
... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::verdanabolditalic | show |
| $FONTDATA = {
'fontname' => 'Verdana,BoldItalic',
'type' => 'TrueType',
'apiname' => 'VeBoIt',
'ascender' => '1005',
'capheight' => '727',
'descender' => '-209',
'isfixedpitch' => '0',
'issymbol' => ... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::timesitalic | show |
| $FONTDATA = {
'fontname' => 'Times-Italic',
'type' => 'Type1',
'apiname' => 'TiIt',
'ascender' => '683',
'capheight' => '653',
'descender' => '-217',
'iscore' => '1',
'isfixedpitch' => '0',
'issy... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::webdings | show |
| $FONTDATA = {
'fontname' => 'Webdings',
'type' => 'TrueType',
'apiname' => 'Web',
'ascender' => '799',
'capheight' => '604',
'descender' => '-200',
'isfixedpitch' => '0',
'issymbol' => '1',
'ital... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::trebuchet | show |
| $FONTDATA = {
'fontname' => 'TrebuchetMS',
'type' => 'TrueType',
'apiname' => 'Treb',
'ascender' => '938',
'capheight' => '715',
'descender' => '-222',
'isfixedpitch' => '0',
'issymbol' => '0',
'... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::trebuchetbolditalic | show |
| $FONTDATA = {
'fontname' => 'TrebuchetMS,BoldItalic',
'type' => 'TrueType',
'apiname' => 'TrBoIt',
'ascender' => '938',
'capheight' => '715',
'descender' => '-222',
'isfixedpitch' => '0',
'issymbol' =&g... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::timesbold | show |
| $FONTDATA = {
'fontname' => 'Times-Bold',
'type' => 'Type1',
'apiname' => 'TiBo',
'ascender' => '683',
'capheight' => '676',
'descender' => '-217',
'iscore' => '1',
'isfixedpitch' => '0',
'italic... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::courieroblique | show |
| $FONTDATA = {
'fontname' => 'Courier-Oblique',
'type' => 'Type1',
'apiname' => 'CoIt',
'ascender' => '629',
'capheight' => '562',
'descender' => '-157',
'iscore' => '1',
'isfixedpitch' => '1',
'i... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::courierbold | show |
| $FONTDATA = {
'fontname' => 'Courier-Bold',
'type' => 'Type1',
'apiname' => 'CoBo',
'ascender' => '629',
'capheight' => '562',
'descender' => '-157',
'iscore' => '1',
'isfixedpitch' => '1',
'ital... |
| PDF-API3-3.001 | PDF::API3::Compat::API2::Resource::Font::CoreFont::wingdings | show |
| $FONTDATA = {
'fontname' => 'Wingdings',
'type' => 'TrueType',
'apiname' => 'WiDi',
'ascender' => '898',
'capheight' => '722',
'descender' => '-210',
'isfixedpitch' => '0',
'issymbol' => '1',
'it... |
| PGP-Sign-0.20 | PGP::Sign | show |
| $VERSION = '0.20' |
| PHP-Include-0.37 | PHP::Include::Vars | show |
| FILTER {
my ($class, $qualifier ) = map { lc($_) } @_;
$QUALIFIER = $qualifier || "my";
$perl = '';
%declared_var = ();
$parser->php_vars( $_ );
print STDERR "\n\nGENERATED PERL:\n\n", $perl, "\n\n"
if $PHP::Include::DEBUG;
... |
| PITA-0.60 | PITA::Guest::Server | show |
| compile |
| PITA-0.60 | PITA::Guest::Server::HTTP | show |
| compile |
| POE-Component-Spread-0.02 | POE::Component::Spread | show |
| $VERSION |
| POE-Component-Spread-0.02 | POE::Driver::Spread | show |
| $VERSION |
| POE-Component-Spread-0.02 | POE::Filter::Spread | show |
| $VERSION |
| POE-Declare-0.59 | POE::Declare::Object | show |
| POE::Declare::compile |
| POE-Declare-HTTP-Client-0.05 | POE::Declare::HTTP::Client | show |
| compile |
| POE-Declare-HTTP-Online-0.02 | POE::Declare::HTTP::Online | show |
| compile |
| POE-Declare-HTTP-Server-0.05 | POE::Declare::HTTP::Server | show |
| compile |
| POE-Declare-Log-File-0.01 | POE::Declare::Log::File | show |
| compile |
| POEx-Role-PSGIServer-1.150280 | POEx::Role::PSGIServer | show |
| role POEx::Role::PSGIServer {
use aliased 'POEx::Role::Event';
use MooseX::Types::Moose(':all');
use POEx::Types::PSGIServer(':all');
use POEx::Types(':all');
use Moose::Autobox;
use HTTP::Message::PSGI;
use HTTP::Status qw(st... |
| POEx-Role-PSGIServer-1.150280 | POEx::Role::PSGIServer::ProxyWriter | show |
| class POEx::Role::PSGIServer::ProxyWriter {
use MooseX::Types::Moose(':all');
use POEx::Types::PSGIServer(':all');
has server_context => (
is => 'ro',
isa => PSGIServerContext,
required => 1
);
h... |
| POEx-Role-PSGIServer-1.150280 | POEx::Role::PSGIServer::Streamer | show |
| class POEx::Role::PSGIServer::Streamer {
use POE::Filter::Map;
use POE::Filter::Stream;
use MooseX::Types::Moose(':all');
use POEx::Types::PSGIServer(':all');
has server_context => (is => 'ro', isa => PSGIServerContext, ... |
| POEx-Weather-OpenWeatherMap-0.003002 | POEx::Weather::OpenWeatherMap | show |
| method start {
$self->set_object_states(
[
$self => +{
emitter_started => 'mxrp_emitter_started',
emitter_stopped => 'mxrp_emitter_stopped',
get_weather => 'ext_get_weather',
ext_http_re... |
| PPM-2.1.9 | PPM::XML::RepositorySummary | show |
| @okids = qw( SOFTPKG ) |
| PPM-2.1.9 | PPM::XML::PPD | show |
| @oattrs = qw( HREF EXEC ) |
| PPM-2.1.9 | PPM::XML::PPMConfig | show |
| @okids = qw( SOFTPKG ) |
| Padre-Plugin-Vi-0.23 | Vimper::CommandSheet | show |
| method _build_data {
my $file = $self->file;
my $lines = [io($file)->slurp]->map(sub{chomp; $_});
my ($head, $tail) = ($lines->shift, $lines);
my @head = map { s/\?//; $_ } split /\t/, $head;
return $tail->map(sub{
... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath | show |
| method to_string
{ $self->parts->map(sub { $_->to_string })->join("\t") }
method command { $self->parts->[-1]->command }
method key_list { $self->parts->grep(sub{ ref($_) =~ /KeyNode/ }) }
method key_count { scalar $self... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxDag | show |
| method _build_group_list { GroupList->new(src => $self->src) }
method _build_dag { Graph->new(directed => 1) }
method graph {
$self->add_group($_) for $self->groups->flatten;
use Data::Dumper;print Dumper $self-&... |
| Padre-Plugin-Vi-0.23 | Vimper::Command::Normal | show |
| method _build_key_list {
my $keys = $self->keys;
my @keys;
while (length $keys) {
push(@keys, $1) if $keys =~ s/^(CTRL-.)//;
push(@keys, $1) if $keys =~ s/^(<[^>]+>)//;
push(@keys, $1) if $keys =~ s/^(.)//;
... |
| Padre-Plugin-Vi-0.23 | Vimper::Command::Normal::Motion | show |
| method syntax_group {
my ($count, $op, $char, $letter, $first_key) = map { $self->$_ }
qw(count op char letter first_key);
my $key_count = scalar $self->key_list->flatten;
my $keys = $key_count == 1? $key_count: "$key_count.$f... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxDag::GroupMerger | show |
| method merge {
$self->registry->{by_type} ||= {};
$self->registry->{by_group} ||= {};
for ($self->grp_vertices) { $type = $_; $self->merge_or_add_node };
for ($self->grp_vertices) { $type = $_; $self->merge_node_ed... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxDag::Group | show |
| method BUILD { $self->add_command($_) for $self->src->flatten }
method some_command { $self->src->[0] }
method syntax_group { $self->some_command->syntax_group }
method count_node_kind { $self->some_command->count_node_ki... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxDag::GroupList | show |
| method _build_groups {
my (%groups, @groups);
for my $command ($self->commands->flatten)
{ push @{ $groups{$command->syntax_group} ||= [] }, $command }
for my $group_name (keys %groups) {
push @groups, Group->new
... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node | show |
| method type {
my ($class) = ref($self) =~ /::(\w+)$/;
return lc($class);
}
method graph_name { $self->type }
method graph_label { $self->type }
method bag_key { undef }
method label_sep { undef }
method must_merge { 0... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node::Char | show |
| method to_string { 'char' }
method must_not_merge { 1 }
1 |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node::Count | show |
| method to_string { 'number' }
1 |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node::Letter | show |
| method to_string { 'letter' }
method must_not_merge { 1 }
1 |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node::Op | show |
| method to_string { 'op' }
method must_merge { 1 }
1 |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node::Key | show |
| method to_string { 'key'. $self->idx. ':'. $self->key }
method graph_label { $self->key }
method graph_name { 'key'. $self->idx }
method bag_key { 'vimperKeys' }
method label_sep { " " }
method escaped_key {
my $key = ... |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node::Command | show |
| method graph_label { $self->to_string }
method bag_key { 'vimperCommands' }
method label_sep { "\\n" }
method must_not_merge { 1 }
method to_string { $self->command->keys. ": ". $self->command->help }
1 |
| Padre-Plugin-Vi-0.23 | Vimper::SyntaxPath::Node::Init | show |
| method to_string { 'init' }
method must_merge { 1 }
1 |
| Pangloss-0.06 | Pangloss::Version | show |
| $Pangloss::VERSION = $VERSION |
| Path-AttrRouter-0.04 | Cat::Controller::Root | show |
| y
|
| Penguin-3.00 | Penguin | show |
| $VERSION = "3.00" |
| Perl-Achievements-0.4.0 | Perl::Achievements | show |
| method generate_report( $format ) {
my $class = 'Perl::Achievements::Report::'. ucfirst $format;
eval "use $class; 1"
or die "could not use format '$format': $@\n";
my $report = $class->new(
who => $self->user->n... |
| Perl-Dist-1.16 | Config | show |
| tie %Config, 'Config', {
archlibexp => $prefix . '\\lib',
archname => 'MSWin32-x86-multi-thread',
cc => 'gcc',
d_readlink => undef,
d_symlink => undef,
dlsrc => 'dl_win32.xs',
dont_use_nlink => undef,
e... |
| Perl-ToPerl6-0.040 | Point | show |
| has w => ( is => 'r0', isa => 'Bool', default => 32 ) |
| Perl6-Classes-0.22 | Perl6::Classes | show |
| FILTER {
$_ = filter;
} |
| Perl6-Currying-0.05 | Perl6::Currying | show |
| FILTER_ONLY
executable => sub {
s<sub \s* ($name) \s* \( (.*?) \) \s* \{>
<sub $1 :Prototype($2) { my($2)=\@_;>gx;
s<sub \s* \( (.*?) \) \s* \{>
<sub ($1) { my($1)=\@_;>gx;
s{(&$name)\.prebind\(}
{Perl6::C... |
| Perl6-Export-0.07 | Perl6::Export | show |
| FILTER {
return unless /\S/;
my $real_import_name = '_import_'.md5_hex($_);
my $false_import_sub = false_import_sub($real_import_name);
my $real_import_sub = "";
s/ \b sub \s+ import \s* ([({]) /sub $real_import_name$1/x
or $real_import_sub = "su... |
| Perl6-Perldoc-0.000013 | Perl6::Perldoc | show |
| FILTER {
my @DATA;
s{ ($DATA_PAT) }{
my ($data_block, $contents) = ($1,$+);
# Special newline handling required under Windows...
if ($^O =~ /MSWin/) {
$contents =~ s{ \r\n }{\n}gxms;
}
# Save ... |
| Perl6-Placeholders-0.07 | Perl6::Placeholders | show |
| FILTER_ONLY
executable => sub {
s<(sub|sort|map|grep)?\s*(?=.*\$\^\w)\{($placeholder)\}> {
my ($context,$code) = ($1||"",$2);
my %vars;
... |
| Perl6-Pod-0.72 | Perl6::Pod | show |
| FILTER {
my @DATA;
s{ ($DATA_PAT) }{
my ($data_block, $contents) = ($1,$+);
# Special newline handling required under Windows...
if ($^O =~ /MSWin/) {
$contents =~ s{ \r\n }{\n}gxms;
}
# Save ... |
| Perl6-Pugs-6.2.13 | Filtered::Comments | show |
| Perl6-Pugs-6.2.13 | Pugs | show |
| - Introduction
- Documentation Index
- Compiler internals:
Compiler
Compiler::Perl6
Compiler::Rule
Compiler::YAML
Compiler::Perl5
Compiler::Parrot
- AST, Grammar, Optimizer internals:
AST::Perl6::API
Grammar::Perl6
Opti... |
| Perl6-Pugs-6.2.13 | main | show |
| push @Grammar::Perl6::ops, Runtime::Perl5::RuleOps::compile_rule( 'infix\:\<\~\>' ) |
| Perl6-Pugs-6.2.13 | Regexp::StructHook | show |
| eval <<'END' |
| Perl6-Pugs-6.2.13 | Perl::Cxt | show |
| type Perl::Cxt is CxtVoid | CxtItem | CxtSlurpy |
| Perl6-Pugs-6.2.13 | Perl6::MetaModel | show |
| sub _ {
my $attr = shift;
($::SELF != $::CLASS)
|| confess 'You cannot change an attribute in $::CLASS using this function';
($::CLASS->find_attribute_spec($attr))
|| confess "Attribute ($attr) is not a valid attribute for $... |
| Perl6-Variables-0.01 | Perl6::Variables | show |
| FILTER {
$DB::single=1;
my $text = "";
pos = 0;
while (pos($_)<length($_)) {
m/\G \$ ($ident) \.? \[ (?=$alist) /sxgc and
$text .= qq/\@{\$$1}[/ and next;
m/\G \$ ($ident) \.? \[ (?!$alist) /sxgc and
$text .= qq/\$$1\->[/ and next... |
| PerlMonksFlairApp-0.2 | PerlMonksFlairApp | show |
| true |
| PerlX-AsyncAwait-0.001003 | Foo | show |
| $inv->error('ARGH') |
| PerlX-AsyncAwait-0.001003 | AA | show |
| print join("\n", (split("\n", $f->get))[0..9], '') |
| PerlX-Maybe-1.201 | Syntax::Feature::Maybe | show |
| __FILE__ |
| PerlX-Maybe-1.201 | PerlX::Maybe | show |
| __FILE__ |
| PerlX-Perform-0.006 | Syntax::Feature::Perform | show |
| __FILE__ |
| PerlX-Perform-0.006 | PerlX::Perform | show |
| __FILE__ |
| PerlX-QuoteOperator-Inescapable-0.002 | PerlX::QuoteOperator::Inescapable | show |
| __FILE__ |
| Perlanet-DBIx-Class-0.02 | Perlanet::DBIx::Class | show |
| method insert_post ($post)
{
$self->post_resultset->create_from_perlanet($post);
}
__PACKAGE__->meta->make_immutable |
| Perlanet-DBIx-Class-0.02 | Perlanet::DBIx::Class::Role::PostResultSet | show |
| method create_from_perlanet ($post)
{
$self->create($self->munge_from_perlanet($post));
}
method munge_from_perlanet ($post)
{
return {
feed_id => $post->feed->id,
author => $post->_entry->author || $p... |
| Perlanet-DBIx-Class-0.02 | Perlanet::DBIx::Class::Role::FeedResultSet | show |
| method fetch_feeds {
return [ map { $self->munge_feed_from_db($_) } $self->all ];
}
method munge_feed_from_db ($feed)
{
return Perlanet::Feed->new(
id => $feed->id,
url => $feed->url || $feed->lin... |
| Perlito5-9.028 | Perlito5::Grammar::Regex6 | show |
| token literal {
[
| \\ .
| <!before \' > .
]*
};
token metasyntax_exp {
[ <!before '>' > . ]+
};
token string_code {
[
| \\ .
| \' <.literal> \'
| \{ <.string_code> \}
| ... |
| Perlito5-9.028 | Perlito5::Grammar::Regex5 | show |
| token rule {
<or_list_exp>
{
my $arg = Perlito5::Match::flat($MATCH->{or_list_exp});
if (@$arg < 1) {
$MATCH->{capture} = "empty";
}
elsif (@$arg < 2) {
($MATCH->{capture... |
| Perlito5-9.028 | Perlito5::Grammar | show |
| Perlito5::Grammar::Statement::add_statement( 'unless' => \&unless ) |
| Perlito5-9.028 | Config | show |
| %Config = (
archlibexp => '/usr/local/lib/perl5/5.22.0/darwin-2level',
archname => 'darwin-2level',
cc => 'cc',
d_readdir => '1',
dlext => 'bundle',
dlsrc => 'dl_dlopen.xs',
dont_use_nlink => undef,
exe... |
| PkgConfig-0.23026 | PkgConfig::Vars | show |
| exit(0) |
| PlRPC-0.2020 | RPC::PlServer::Test | show |
| @RPC::PlServer::ISA = qw(Net::Daemon::Test) |
| Plack-App-PgREST-0.06 | Plack::App::PgREST | show |
| method select($param, $args) {
use Data::Dumper;
my $req = encode_json({
collection => $args->{collection},
l => n($param->get('l')),
sk => n($param->get('sk')),
c => n($param->get('c')),
... |
| Plack-Middleware-DBIC-QueryLog-0.05 | Maker | show |
| __PACKAGE__->run_if_script |
| Plack-Middleware-Debug-DBIC-QueryLog-0.09 | Maker | show |
| __PACKAGE__->run_if_script |
| Plack-Middleware-Debug-HTML-Mason-0.3 | Plack::Middleware::Debug::HTML::Mason | show |
| $Plack::Middleware::Debug::HTML::Mason::Plugin::VERSION = '0.3' |
| Plack-Middleware-NewRelic-0.0502 | Plack::Middleware::NewRelic | show |
| method _build_license_key {
my $license_key = $ENV{NEWRELIC_LICENSE_KEY};
die 'Missing NewRelic license key' unless $self->license_key;
return $license_key;
}
method _build_app_name {
my $app_name = $ENV{NEWRELIC_APP_NAME};
die 'Mi... |
| Platform-Unix-0.002 | Platform::Unix | show |
| $ENV{PERL_PLATFORM_OVERRIDE}||($^O =~ /^(Linux|.*BSD.*|.*UNIX.*|Darwin|Solaris|SunOS|Haiku|Next|dec_osf|svr4|sco_sv|unicos.*|.*x)$/i) |
| Platform-Windows-0.002 | Platform::Windows | show |
| $ENV{PERL_PLATFORM_OVERRIDE}||($^O =~ /^(MSWin32|cygwin)$/i) |
| Pod-Browser-1.0.1 | Pod::Browser | show |
| sub { __PACKAGE__->run( @_) } |
| Pod-Coverage-mop-0.002 | Pod::Coverage::mop | show |
| class Pod::Coverage::mop
extends Pod::Coverage::CountParents {
use Pod::Coverage::CountParents;
use Module::Load;
method new($class: %args) {
my $package = $args{package};
load $package;
if (my $meta = mop::meta... |
| Pod-Knit-0.0.1 | Pod::Knit::Manual | show |
| $Pod::Knit::Manual::VERSION = '0.0.1' |
| Pod-L10N-1.03 | Pod::L10N | show |
| $VERSION = '1.03' |
| Pod-POM-Web-PSGI-0.002 | Pod::POM::Web::PSGI | show |
| CGI::Emulate::PSGI->handler(sub {
Pod::POM::Web->handler
}) |
| PodSimplify-0.04 | Pod::Simplify | show |
| %Escape2ASCII = (
"lt" => "<",
"gt" => ">",
"amp" => "&",
"quot" => '"',
) |
| Poet-0.16 | Poet | show |
| method import ($class:) {
my $poet = Poet::Environment->current_env
or die "environment has not been initialized!";
$poet->importer->export_to_level( 1, @_ );
}
1 |
| Poet-0.16 | Poet::Script | show |
| method import ($pkg:) {
unless ( Poet::Environment->current_env ) {
my $root_dir = determine_root_dir();
my $poet = initialize_with_root_dir($root_dir);
}
Poet::Environment->current_env->importer->export_to_leve... |
| Poet-0.16 | Poet::Server | show |
| method load_startup_modules () {
return if $loaded_startup_modules++;
foreach my $module ( @{ $conf->get_list('server.load_modules') } ) {
Class::Load::load_class($module);
}
}
1 |
| Poet-0.16 | Poet::Cache | show |
| method initialize_caching () {
my $default_config =
{ defaults => { driver => 'File', root_dir => $poet->data_path("cache") } };
my $config = $conf->get_hash( 'cache' => $default_config );
__PACKAGE__->config($config... |
| Poet-0.16 | Poet::Mason | show |
| method instance ($class:) {
$instance ||= $class->new();
$instance;
}
method new ($class:) {
return $class->SUPER::new( $class->get_options, @_ );
}
method get_options ($class:) {
my %defaults = (
cache_root_class => ... |
| Poet-0.16 | Poet::Log | show |
| method get_logger ($class: %params) {
my $category = $params{category} || caller();
return Log::Any->get_logger( category => $category );
}
method initialize_logging ($class:) {
if ( can_load('Log::Log4perl')
&& can_load('Log:... |
| Poet-0.16 | Poet::Import | show |
| method _build_valid_vars () {
my @provide_methods = grep { /^provide_var_/ } $self->meta->get_method_list;
return [ sort( map { substr( $_, 12 ) } @provide_methods ) ];
}
method _build_default_tags () {
return ['debug'];
}
method expor... |
| Poet-0.16 | Poet::App::Command::new | show |
| method abstract () { "Create a new Poet installation" }
method description () { $description }
method usage_desc () { "poet new [-d dir] [-q] <AppName>" }
method _build_dir () {
return $self->app_name_to_dir( $self->app_name );
}
method ... |
| Poet-0.16 | Poet::App::Command::script | show |
| method abstract () {
"Create a Poet script";
}
method usage_desc () {
return "poet script <script-name>";
}
method execute ($opt, $args) {
$self->usage_error("takes one argument (script name)") unless @$args == 1;
my ($path) = @... |
| Poet-0.16 | Poet::Environment::Generator | show |
| method generate_environment_directory ($class: %params) {
my $root_dir = $params{root_dir} or die "must specify root_dir";
my $app_name = $params{app_name} || basename($root_dir);
my $quiet = $params{quiet};
my $style = $params{style... |
| Poet-0.16 | Poet::Mason::Plugin::Request | show |
| method redirect () {
$self->res->redirect(@_);
$self->clear_and_abort();
}
method not_found () {
$self->clear_and_abort(404);
}
method session () {
$self->req->session;
}
method send_json ($data) {
$self->clear_... |
| Pointer-0.11 | Pointer::int | show |
| const pack_template => 'i!' |
| Pointer-0.11 | Pointer::long | show |
| const sizeof => $Config{longsize} |
| Pointy-Counter-0.002 | Pointy::Counter | show |
| __FILE__ |
| PostScript-File-2.23 | PostScript::File::Functions | show |
| __PACKAGE__->_init_module(\*DATA) |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Helvetica | show |
| $PostScript::File::Metrics::Metrics{'Helvetica'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,278,355,556,556,889,667,222,333,333,389,584,278,333,278,278,
556,556,556,556,556,556,556,556,556,556,278,278,584,584,... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Courier | show |
| $PostScript::File::Metrics::Metrics{'Courier'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,60... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Helvetica::BoldOblique | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-BoldOblique'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,333,474,556,556,889,722,278,333,333,389,584,278,333,278,278,
556,556,556,556,556,556,556,556,556,556,333,... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Helvetica::Bold | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-Bold'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,333,474,556,556,889,722,278,333,333,389,584,278,333,278,278,
556,556,556,556,556,556,556,556,556,556,333,333,584... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Helvetica::Oblique | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-Oblique'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,278,355,556,556,889,667,222,333,333,389,584,278,333,278,278,
556,556,556,556,556,556,556,556,556,556,278,278,... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Courier::BoldOblique | show |
| $PostScript::File::Metrics::Metrics{'Courier-BoldOblique'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600,60... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Courier::Bold | show |
| $PostScript::File::Metrics::Metrics{'Courier-Bold'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600,600,600,6... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Courier::Oblique | show |
| $PostScript::File::Metrics::Metrics{'Courier-Oblique'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600,600,60... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Times::Italic | show |
| $PostScript::File::Metrics::Metrics{'Times-Italic'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,333,420,500,500,833,778,333,333,333,500,675,250,333,250,278,
500,500,500,500,500,500,500,500,500,500,333,333,675,6... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Times::Roman | show |
| $PostScript::File::Metrics::Metrics{'Times-Roman'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,333,408,500,500,833,778,333,333,333,500,564,250,333,250,278,
500,500,500,500,500,500,500,500,500,500,278,278,564,56... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Times::Bold | show |
| $PostScript::File::Metrics::Metrics{'Times-Bold'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,333,555,500,500,1000,833,333,333,333,500,570,250,333,250,278,
500,500,500,500,500,500,500,500,500,500,333,333,570,57... |
| PostScript-File-2.23 | PostScript::File::Metrics::std::Times::BoldItalic | show |
| $PostScript::File::Metrics::Metrics{'Times-BoldItalic'}{'std'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,389,555,500,500,833,778,333,333,333,500,570,250,333,250,278,
500,500,500,500,500,500,500,500,500,500,333,333,5... |
| PostScript-File-2.23 | PostScript::File::Metrics::sym::Symbol | show |
| $PostScript::File::Metrics::Metrics{'Symbol'}{'sym'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,333,713,500,549,833,778,439,333,333,500,549,250,549,250,278,
500,500,500,500,500,500,500,500,500,500,278,278,549,549,549... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Helvetica | show |
| $PostScript::File::Metrics::Metrics{'Helvetica'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,278,355,556,556,889,667,222,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,556,556,278,278,5... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Courier | show |
| $PostScript::File::Metrics::Metrics{'Courier'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600,600,600... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Helvetica::BoldOblique | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-BoldOblique'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,333,474,556,556,889,722,278,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,556,5... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Helvetica::Bold | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-Bold'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,333,474,556,556,889,722,278,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,556,556,333,... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Helvetica::Oblique | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-Oblique'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
278,278,355,556,556,889,667,222,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,556,556,2... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Courier::BoldOblique | show |
| $PostScript::File::Metrics::Metrics{'Courier-BoldOblique'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Courier::Bold | show |
| $PostScript::File::Metrics::Metrics{'Courier-Bold'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600,60... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Courier::Oblique | show |
| $PostScript::File::Metrics::Metrics{'Courier-Oblique'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Times::Italic | show |
| $PostScript::File::Metrics::Metrics{'Times-Italic'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,333,420,500,500,833,778,333,333,333,500,675,250,675,250,278,
500,500,500,500,500,500,500,500,500,500,333,33... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Times::Roman | show |
| $PostScript::File::Metrics::Metrics{'Times-Roman'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,333,408,500,500,833,778,333,333,333,500,564,250,564,250,278,
500,500,500,500,500,500,500,500,500,500,278,278... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Times::Bold | show |
| $PostScript::File::Metrics::Metrics{'Times-Bold'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,333,555,500,500,1000,833,333,333,333,500,570,250,570,250,278,
500,500,500,500,500,500,500,500,500,500,333,333... |
| PostScript-File-2.23 | PostScript::File::Metrics::iso_8859_1::Times::BoldItalic | show |
| $PostScript::File::Metrics::Metrics{'Times-BoldItalic'}{'iso-8859-1'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
250,389,555,500,500,833,778,333,333,333,500,570,250,606,250,278,
500,500,500,500,500,500,500,500,500,500,33... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Helvetica | show |
| $PostScript::File::Metrics::Metrics{'Helvetica'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
278,278,355,556,556,889,667,222,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,556,556,278,2... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Courier | show |
| $PostScript::File::Metrics::Metrics{'Courier'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,600,600,600,600,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,600,600... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Helvetica::BoldOblique | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-BoldOblique'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
278,333,474,556,556,889,722,278,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,5... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Helvetica::Bold | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-Bold'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
278,333,474,556,556,889,722,278,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,556,556,... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Helvetica::Oblique | show |
| $PostScript::File::Metrics::Metrics{'Helvetica-Oblique'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
278,278,355,556,556,889,667,222,333,333,389,584,278,584,278,278,
556,556,556,556,556,556,556,556,556,5... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Courier::BoldOblique | show |
| $PostScript::File::Metrics::Metrics{'Courier-BoldOblique'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,600,600,600,600,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Courier::Bold | show |
| $PostScript::File::Metrics::Metrics{'Courier-Bold'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,600,600,600,600,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600,60... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Courier::Oblique | show |
| $PostScript::File::Metrics::Metrics{'Courier-Oblique'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,600,600,600,600,0,0,0,0,0,0,0,0,0,0,0,
600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,
600,600,600,600,600,600,600,600,600,600... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Times::Italic | show |
| $PostScript::File::Metrics::Metrics{'Times-Italic'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
250,333,420,500,500,833,778,333,333,333,500,675,250,675,250,278,
500,500,500,500,500,500,500,500,500,500,33... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Times::Roman | show |
| $PostScript::File::Metrics::Metrics{'Times-Roman'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
250,333,408,500,500,833,778,333,333,333,500,564,250,564,250,278,
500,500,500,500,500,500,500,500,500,500,278... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Times::Bold | show |
| $PostScript::File::Metrics::Metrics{'Times-Bold'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
250,333,555,500,500,1000,833,333,333,333,500,570,250,570,250,278,
500,500,500,500,500,500,500,500,500,500,333... |
| PostScript-File-2.23 | PostScript::File::Metrics::cp1252::Times::BoldItalic | show |
| $PostScript::File::Metrics::Metrics{'Times-BoldItalic'}{'cp1252'} = [
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,278,333,333,333,0,0,0,0,0,0,0,0,0,0,0,
250,389,555,500,500,833,778,333,333,333,500,570,250,606,250,278,
500,500,500,500,500,500,500,500,500,50... |
| Prima-1.56 | Prima::Themes::Round3D | show |
| Prima::Themes::register( 'Prima::themes::round3d', 'round3d', [
'Prima::Button' => \%wrap_paint,
'Prima::ScrollBar' => \%wrap_paint,
'Prima::InputLine' => \%wrap_paint,
],
) |
| Prima-1.56 | Prima::themes::sysimage | show |
| Prima::Themes::register( 'Prima::themes::sysimage', 'sysimage-standard', undef, undef, \&install) |
| Prima-1.56 | Prima::Themes::color | show |
| Prima::Themes::register( 'Prima::themes::color', 'gray', ['Prima::Widget' => 0xFFFFFF], \&merger) |
| Primeval-0.02 | Primeval | show |
| __PACKAGE__ if 'first require' |
| Progress-PV-0.02 | Progress::PV | show |
| *pr = \&showprogress |
| QBit-Application-0.017 | QBit::Application | show |
| TRUE |
| QBit-Application-0.017 | QBit::Application::Model | show |
| TRUE |
| QBit-Application-0.017 | QBit::Application::Part | show |
| TRUE |
| QBit-Application-0.017 | QBit::Application::_Utils::TmpLocale | show |
| TRUE |
| QBit-Application-0.017 | QBit::Application::_Utils::TmpRights | show |
| TRUE |
| QBit-Application-0.017 | QBit::Application::Model::RBAC | show |
| TRUE |
| QBit-Application-Model-Authorization-0.007 | Exception::Authorization | show |
| TRUE |
| QBit-Application-Model-Authorization-0.007 | QBit::Application::Model::DB::Authorization | show |
| TRUE |
| QBit-Application-Model-DB-0.030 | QBit::Application::Model::DB | show |
| TRUE |
| QBit-Application-Model-DB-0.030 | QBit::Application::Model::DB::VirtualTable | show |
| TRUE |
| QBit-Application-Model-DB-0.030 | QBit::Application::Model::DB::Filter | show |
| TRUE |
| QBit-Application-Model-DB-0.030 | QBit::Application::Model::DB::Table | show |
| TRUE |
| QBit-Application-Model-DB-0.030 | Exception::DB::NoFieldsAvailable | show |
| TRUE |
| QBit-Application-Model-DB-0.030 | QBit::Application::Model::DB::Field | show |
| TRUE |
| QBit-Application-Model-DB-0.030 | QBit::Application::Model::DB::Class | show |
| TRUE |
| QBit-Application-Model-DB-clickhouse-0.007 | QBit::Application::Model::DB::clickhouse | show |
| TRUE |
| QBit-Application-Model-DB-clickhouse-0.007 | QBit::Application::Model::DB::clickhouse::dbi | show |
| TRUE |
| QBit-Application-Model-DB-clickhouse-0.007 | QBit::Application::Model::DB::clickhouse::Table | show |
| TRUE |
| QBit-Application-Model-DB-clickhouse-0.007 | QBit::Application::Model::DB::clickhouse::Query | show |
| TRUE |
| QBit-Application-Model-DB-clickhouse-0.007 | QBit::Application::Model::DB::clickhouse::Field | show |
| TRUE |
| QBit-Application-Model-DB-clickhouse-0.007 | QBit::Application::Model::DB::clickhouse::st | show |
| TRUE |
| QBit-Application-Model-DB-mysql-0.017 | QBit::Application::Model::DB::mysql | show |
| TRUE |
| QBit-Application-Model-DB-mysql-0.017 | QBit::Application::Model::DB::mysql::Table | show |
| TRUE |
| QBit-Application-Model-DB-mysql-0.017 | QBit::Application::Model::DB::mysql::Query | show |
| TRUE |
| QBit-Application-Model-DB-mysql-0.017 | QBit::Application::Model::DB::mysql::Field | show |
| TRUE |
| QBit-Application-Model-DB-mysql-Authorization-0.001 | QBit::Application::Model::DB::mysql::Authorization | show |
| TRUE |
| QBit-Application-Model-DB-mysql-KvStore-0.002 | QBit::Application::Model::DB::mysql::KvStore | show |
| TRUE |
| QBit-Application-Model-DB-mysql-RBAC-0.002 | QBit::Application::Model::DB::mysql::RBAC | show |
| TRUE |
| QBit-Application-Model-DB-mysql-Table-MultistateActionLog-0.002 | QBit::Application::Model::DB::mysql::Table::MultistateActionLog | show |
| TRUE |
| QBit-Application-Model-DB-mysql-Users-0.002 | QBit::Application::Model::DB::mysql::Users | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::Filter | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::_Utils::Fields | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::Filter::subfilter | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::Filter::boolean | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::Filter::dictionary | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::Filter::number | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::Filter::text | show |
| TRUE |
| QBit-Application-Model-DBManager-0.022 | QBit::Application::Model::DBManager::Filter::multistate | show |
| TRUE |
| QBit-Application-Model-DBManager-Users-0.007 | QBit::Application::Model::DBManager::Users | show |
| TRUE |
| QBit-Application-Model-DBManager-Users-0.007 | QBit::Application::Model::DBManager::Filter::extra_fields | show |
| QBit-Application-Model-DBManager-Users-0.007 | QBit::Application::Model::DB::Users | show |
| TRUE |
| QBit-Application-Model-KvStore-0.004 | QBit::Application::Model::KvStore | show |
| TRUE |
| QBit-Application-Model-KvStore-0.004 | QBit::Application::Model::DB::KvStore | show |
| TRUE |
| QBit-Application-Model-Multistate-0.009 | QBit::Application::Model::Multistate | show |
| TRUE |
| QBit-Application-Model-Multistate-DB-0.010 | QBit::Application::Model::Multistate::DB | show |
| TRUE |
| QBit-Application-Model-RBAC-DB-0.003 | QBit::Application::Model::RBAC::DB | show |
| TRUE |
| QBit-Application-Model-RBAC-DB-0.003 | QBit::Application::Model::DB::RBAC | show |
| TRUE |
| QBit-Application-Model-SendMail-0.008 | Exception::SendMail | show |
| TRUE |
| QBit-Base-0.003 | QBit::Base | show |
| TRUE |
| QBit-Class-0.3 | QBit::Class | show |
| TRUE |
| QBit-Cron-0.004 | QBit::Cron | show |
| TRUE |
| QBit-Cron-0.004 | QBit::Cron::Methods | show |
| TRUE |
| QBit-GraphViz-0.003 | QBit::GraphViz | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function::SUM | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function::MIN | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function::FIELD | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function::DISTINCT | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function::MAX | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function::CONCAT | show |
| TRUE |
| QBit-QueryData-0.011 | QBit::QueryData::Function::COUNT | show |
| TRUE |
| QBit-TimeLog-0.5 | QBit::TimeLog | show |
| TRUE |
| QBit-TimeLog-XS-0.008 | QBit::TimeLog::XS | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator::Type | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator::PathManager | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator::Type::scalar | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator::Type::palindrome | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator::Type::variable | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator::Type::array | show |
| TRUE |
| QBit-Validator-0.012 | QBit::Validator::Type::hash | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Response | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Routing | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Request | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Template::Provider | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::input | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::checkbox | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::select | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::password | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::email | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::textarea | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::hidden | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::submit | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::reCAPTCHA | show |
| TRUE |
| QBit-WebInterface-0.033 | QBit::WebInterface::Controller::Form::Field::button | show |
| TRUE |
| QBit-WebInterface-Apache2-0.006 | QBit::WebInterface::Apache2 | show |
| TRUE |
| QBit-WebInterface-Apache2-0.006 | QBit::WebInterface::Apache2::Request | show |
| TRUE |
| QBit-WebInterface-Controller-Multistate-0.004 | QBit::WebInterface::Controller::Multistate | show |
| TRUE |
| QBit-WebInterface-Controller-Pod-0.004 | QBit::WebInterface::Controller::Pod | show |
| TRUE |
| QBit-WebInterface-Controller-RBAC-0.004 | QBit::WebInterface::Controller::RBAC | show |
| TRUE |
| QBit-WebInterface-FastCGI-0.006 | QBit::WebInterface::FastCGI | show |
| TRUE |
| QBit-WebInterface-FastCGI-0.006 | QBit::WebInterface::FastCGI::Request | show |
| TRUE |
| QBit-WebInterface-OwnServer-0.008 | QBit::WebInterface::OwnServer | show |
| TRUE |
| QBit-WebInterface-OwnServer-0.008 | Exception::WebInterface::OwnServer::BadRequest | show |
| TRUE |
| QBit-WebInterface-PSGI-0.005 | QBit::WebInterface::PSGI | show |
| TRUE |
| QBit-WebInterface-PSGI-0.005 | QBit::WebInterface::PSGI::Request | show |
| TRUE |
| QBit-WebInterface-Routing-0.010 | QBit::WebInterface::Routing | show |
| TRUE |
| QBit-WebInterface-Routing-0.010 | QBit::WebInterface::Routing::Routes | show |
| TRUE |
| Qgoda-0.9.6 | Qgoda::PluginLoader::TT2::Filter | show |
| unshift @INC, Qgoda::PluginLoader::TT2::Filter->new |
| Qt-0.96.0 | NorwegianWoodStyle | show |
| void NorwegianWoodStyle::drawControl(ControlElement element,
const Qt::StyleOption *option,
Qt::Painter *painter,
const Qt::Widget *widget) cons... |
| RCGI-1.20 | RCGI::Config | show |
| $path = '/usr/rcgi' |
| RDBAL-1.2 | RDBAL::Config | show |
| %middle_module = (
'Pg' => 'Pg',
'ApacheSybaseDBlib' => 'Apache::Sybase::DBlib',
'SybaseDBlib' => 'Sybase::DBlib',
'ODBC' => 'Win32::ODBC',
'dbi:' => 'DBI'
) |
| RDF-QueryX-Lazy-0.003 | RDF::QueryX::Lazy | show |
| TRUE |
| RMI-0.10 | RMI::Server::ForkedPipes | show |
| RMI::Node::_mk_ro_accessors(__PACKAGE__,'peer_pid') |
| RPM-Header-PurePerl-1.0.2 | RPM::Header::PurePerl::Tagtable | show |
| Reaction-0.002005 | Reaction::InterfaceModel::Search::UpdateSpec | show |
| method do_apply () {
my $data = $self->parameter_hashref;
my $spec = $self->target_model;
foreach my $name (keys %$data) {
if (length(my $value = $data->{$name})) {
$spec->$name($value);
} else {
$spec->${\"clear_$... |
| Reaction-0.002005 | Reaction::InterfaceModel::Search::Spec | show |
| method from_string ($class: $string, $other) {
my %raw = %{from_json($string)};
my %val;
@val{keys %raw} = map {
$class->_from_string_unpack_value($_, $raw{$_})
} keys %raw;
return $class->new({ %val, %{$other||{}} });
}
1 |
| Ref-Store-0.20 | Ref::Store::ThreadUtil::OldLookups | show |
| push @EXPORT, qw(hr_thrutil_store_kinfo hr_thrutil_get_kinfo) |
| Reflex-0.100 | Reflex::Role::PidCatcher | show |
| role {
my $p = shift;
my $att_active = $p->att_active();
my $att_pid = $p->att_pid();
my $cb_exit = $p->cb_exit();
requires $att_active, $att_pid, $cb_exit;
my $method_start = $p->method_start();
my $method_stop = $... |
| Reflex-0.100 | Reflex::Role::SigCatcher | show |
| role {
my $p = shift;
my $att_signal = $p->att_signal();
my $att_active = $p->att_active();
my $cb_signal = $p->cb_signal();
requires $att_signal, $att_active, $cb_signal;
my $method_start = $p->method_start();
my $method_... |
| Regexp-Fields-0.046 | Regexp::Fields::tie | show |
| tie %{&}, __PACKAGE__ |
| Regexp-HTMLify-0.002 | Regexp::HTMLify | show |
| _init() |
| Relations-0.95 | Relations | show |
| $Relations::VERSION |
| Relations-Abstract-0.94 | Relations::Abstract | show |
| $Relations::Abstract::VERSION |
| Relations-Display-0.92 | Relations::Display | show |
| $Relations::Display::VERSION |
| Relations-Display-0.92 | Relations::Display::Table | show |
| $Relations::Display::Table::VERSION |
| Relations-Family-0.94 | Relations::Family | show |
| $Relations::Family::VERSION |
| Relations-Family-0.94 | Relations::Family::Value | show |
| $Relations::Family::Value::VERSION |
| Relations-Family-0.94 | Relations::Family::Member | show |
| $Relations::Family::Member::VERSION |
| Relations-Family-0.94 | Relations::Family::Rivalry | show |
| $Relations::Family::Rivalry::VERSION |
| Relations-Family-0.94 | Relations::Family::Lineage | show |
| $Relations::Family::Lineage::VERSION |
| Relations-Query-0.93 | Relations::Query | show |
| $Relations::Query::VERSION |
| Renard-Curie-0.004 | Renard::Curie::ViewModel::ViewManager | show |
| method _trigger_current_view($view) {
$self->signal_emit( 'update-view' => $view );
}
method _trigger_number_of_columns($new_number_of_columns) {
my $grid_options = $self->view_options->grid_options->cset( columns => $new_number_of_co... |
| Renard-Curie-0.004 | Renard::Curie::Component::Outline | show |
| method BUILD(@) {
my $frame = Gtk3::Frame->new('Outline');
my $scrolled_window = Gtk3::ScrolledWindow->new;
$scrolled_window->set_vexpand(TRUE);
$scrolled_window->set_hexpand(TRUE);
$scrolled_window->set_policy( 'automatic', 'automatic... |
| Renard-Curie-0.004 | Renard::Curie::Component::AccelMap | show |
| method BUILD(@) {
Gtk3::AccelMap::add_entry(
'<Curie-Main>/File/Open',
Gtk3::Gdk::KEY_O(),
'control-mask'
);
Gtk3::AccelMap::add_entry(
'<Curie-Main>/File/Quit',
Gtk3::Gdk::KEY_Q(),
'control-mask'
);
Gtk3::AccelMap::add_entr... |
| Renard-Curie-0.004 | Renard::Curie::Component::PageDrawingArea::Role::NavigationButtons | show |
| method setup_button_events() {
$self->builder->get_object('button-first')->signal_connect(
clicked => \&on_clicked_button_first_cb, $self );
$self->builder->get_object('button-last')->signal_connect(
clicked => \&on_clicked_b... |
| Renard-Curie-0.004 | Renard::Curie::Component::PageDrawingArea::Role::ScrollWindow | show |
| method increment_scroll( (InstanceOf['Gtk3::Adjustment']) $current ) {
my $adjustment = $current->get_value + $current->get_step_increment;
$current->set_value($adjustment);
}
method decrement_scroll( (InstanceOf['Gtk3::Adjustment']) $current ... |
| Renard-Curie-0.004 | Renard::Curie::Component::PageDrawingArea::Role::PageLabel | show |
| method setup_number_of_pages_label() {
$self->builder->get_object("number-of-pages-label")
->set_text( $self->view->document->number_of_pages );
}
1 |
| Renard-Curie-0.004 | Renard::Curie::Component::PageDrawingArea::Role::PageEntry | show |
| method setup_text_entry_events() {
$self->builder->get_object('page-number-entry')->signal_connect(
activate => \&on_activate_page_number_entry_cb, $self );
}
callback on_activate_page_number_entry_cb( $entry, $self ) {
my $text = $entry-... |
| Renard-Curie-0.004 | Renard::Curie::Component::PageDrawingArea::Role::MouseScrollBindings | show |
| method setup_scroll_bindings() {
$self->scrolled_window->signal_connect(
'scroll-event' => \&on_scroll_event_cb, $self );
}
callback on_scroll_event_cb($window, $event, $self) {
if ( $event->state == 'control-mask' && $event->direction... |
| Renard-Curie-0.004 | Renard::Curie::Component::MainWindow::Role::MenuBar | show |
| callback on_open_file_dialog_cb( $event, $self ) {
my $file_chooser = Renard::Curie::Component::FileChooser->new( main_window => $self );
my $dialog = $file_chooser->get_open_file_dialog_with_filters;
my $result = $dialog->run;
if ( $res... |
| Renard-Curie-0.004 | Renard::Curie::Component::MainWindow::Role::DragAndDrop | show |
| method setup_dnd() {
$self->content_box->drag_dest_set('all', [], 'copy');
my $target_list = Gtk3::TargetList->new([
Gtk3::TargetEntry->new( 'text/uri-list', 0, $self->DND_TARGET_URI_LIST ),
Gtk3::TargetEntry->new( 'text/plain' ,... |
| Renard-Curie-0.004 | Renard::Curie::Model::View::Grid::Subview | show |
| method _build__page_info() {
my $doc = $self->_grid_view->document;
my $page_numbers = $self->_grid_scheme->pages;
my %rendered_page_by_number = map {
( $_ =>
$doc->get_rendered_page(
page_number => $_,
zoom_level =&g... |
| Renard-Curie-0.004 | Renard::Curie::Model::View::Role::Pageable | show |
| method set_current_page_to_first() {
$self->page_number( $self->document->first_page_number );
}
method set_current_page_to_last() {
$self->page_number( $self->document->last_page_number );
}
method can_move_to_previous_page() :Retur... |
| Renard-Curie-0.004 | Renard::Curie::Model::View::Role::Renderable | show |
| method draw_page(
(InstanceOf['Gtk3::DrawingArea']) $widget,
(InstanceOf['Cairo::Context']) $cr
) {
...
}
method get_size_request() :ReturnType( list => SizeRequest) {
...
}
1 |
| Renard-Curie-0.004 | Renard::Curie::Model::View::Role::SubviewPageable | show |
| method set_current_subview_to_first() {
$self->_subview_idx( 0 );
}
method set_current_subview_to_last() {
$self->_subview_idx( $self->_number_of_subviews - 1 );
}
method can_move_to_previous_subview() :ReturnType(Bool) {
$self->_subview... |
| Renard-Curie-0.004 | Renard::Curie::Container::App | show |
| method _test_current_view() {
$self->view_manager->current_view;
}
1 |
| Renard-Incunabula-0.004 | Renard::Incunabula::Devel::TestHelper | show |
| classmethod test_data_directory() :ReturnType(Dir) {
require Path::Tiny;
Path::Tiny->import();
if( not defined $ENV{RENARD_TEST_DATA_PATH} ) {
die "Must set environment variable RENARD_TEST_DATA_PATH to the path for the test-data repository";
}
... |
| Renard-Incunabula-Document-0.004 | Renard::Incunabula::Outline | show |
| method _build_tree_store() {
load 'Gtk3', '-init';
my $data = Gtk3::TreeStore->new( 'Glib::String', 'Glib::String', );
my $outline_items = $self->items;
my $level = 0;
my $iter = undef;
my @parents = ();
for my $item (@$outline_items) {
... |
| Renard-Incunabula-Document-0.004 | Renard::Incunabula::Document::Devel::TestHelper | show |
| classmethod create_null_document( :$repeat = 1 ) {
require Renard::Incunabula::Document::Null;
require Renard::Incunabula::Page::Null;
my $null_doc = Renard::Incunabula::Document::Null->new(
pages => [
map {
Renard::Incunabula::Page::Nu... |
| Renard-Incunabula-Document-0.004 | Renard::Incunabula::Document::Role::FromFile | show |
| method _build_filename_uri() :ReturnType(FileUri) {
FileUri->coerce($self->filename);
}
1 |
| Renard-Incunabula-Format-Cairo-0.004 | Renard::Incunabula::Page::Role::BoundsFromCairoImageSurface | show |
| method _build_width() :ReturnType(PositiveOrZeroInt) {
$self->cairo_image_surface->get_width;
}
method _build_height() :ReturnType(PositiveOrZeroInt) {
$self->cairo_image_surface->get_height;
}
1 |
| Renard-Incunabula-Format-Cairo-0.004 | Renard::Incunabula::Format::Cairo::Devel::TestHelper | show |
| classmethod create_cairo_document( :$repeat = 1, :$width = 5000, :$height = 5000 ) {
my $colors = [
(
[ 1, 0, 0 ],
[ 0, 1, 0 ],
[ 0, 0, 1 ],
[ 0, 0, 0 ],
) x ( $repeat )
];
my @surfaces = map {
my $surface = Cairo::ImageSurface->c... |
| Renard-Incunabula-Format-PDF-0.004 | Renard::Incunabula::Format::PDF::InformationDictionary | show |
| method Title() :ReturnType(Maybe[Str]) {
$self->_get_data('Title');
}
method Subject() :ReturnType(Maybe[Str]) {
$self->_get_data('Subject');
}
method Author() :ReturnType(Maybe[Str]) {
$self->_get_data('Author');
}
method Keywords() :Retur... |
| Renard-Incunabula-Frontend-Gtk3-0.004 | Renard::Incunabula::Frontend::Gtk3::Helper | show |
| fun _scrolled_window_viewport_shim() {
if( not Gtk3::CHECK_VERSION('3', '8', '0') ) {
Class::Method::Modifiers::install_modifier
"Gtk3::ScrolledWindow",
around => add => fun(@) {
my $orig = shift;
my $self = shift; ... |
| Renard-Incunabula-MuPDF-mutool-0.004 | Renard::Incunabula::MuPDF::mutool | show |
| fun _call_mutool( @mutool_args ) {
my @args = ( $Renard::Incunabula::MuPDF::mutool::MUTOOL_PATH, @mutool_args );
my ($stdout, $exit);
if( $^O eq 'MSWin32' ) {
my $temp_fh = File::Temp->new;
close $temp_fh;
my $output_... |
| Renard-Incunabula-MuPDF-mutool-0.004 | Renard::Incunabula::MuPDF::mutool::ObjectParser | show |
| method resolve_key( (Str) $key ) {
return unless $self->type == $self->TypeDictionary
&& exists $self->data->{$key};
my $value = $self->data->{$key};
while( $value->type == $self->TypeReference ) {
$value = $self->new_f... |
| Renard-Incunabula-MuPDF-mutool-0.004 | Renard::Incunabula::MuPDF::mutool::DateObject | show |
| method _build_data() {
my $date_string = $self->string;
my $date_re = qr/
(?<Prefix>D:)?
(?<Year> \d{4} ) # YYYY is the year
(?<Month> \d{2} )? # MM is the month
(?<Day> \d{2} )? # DD is the day (01... |
| Role-Subsystem-0.101341 | Role::Subsystem | show |
| role {
my ($p) = @_;
my $what = $p->what;
my $ident = $p->ident;
my $what_id = $p->what_id;
my $getter = $p->getter;
my $id_method = $p->id_method;
my $weak_ref = $p->weak_ref;
my $w_pred = "has_initi... |
| Rubyish-0.32 | Rubyish::Enumerable | show |
| def to_a {
my @arr;
$self->each(sub { push @arr, $_[0] });
return Rubyish::Array->new(\@arr);
}
1 |
| Runops-Optimized-0.02 | Runops::Optimized | show |
| XSLoader::load "Runops::Optimized", $VERSION |
| SDL-OpenGL-Cg-0.01 | SDL::OpenGL::Cg | show |
| XSLoader::load('SDL::OpenGL::Cg', $VERSION) |
| SDL_Perl-2.1.2 | SDL::Constants | show |
| @EXPORT=qw(
AUDIO_S16
AUDIO_S16MSB
AUDIO_S8
AUDIO_U16
AUDIO_U16MSB
AUDIO_U8
CD_ERROR
CD_PAUSED
CD_PLAYING
CD_STOPPED
CD_TRAYEMPTY
INADDR_ANY
INADDR_NONE
KMOD_ALT
KMOD_CAPS
KMOD_CTRL
KMOD_LALT
KMOD_LCTRL
KMOD_LSHIFT
KMOD_NONE
KMOD_NUM
... |
| SDL_Perl-2.1.2 | SDL::OpenGL::Constants | show |
| @EXPORT=qw(
GLU_AUTO_LOAD_MATRIX
GLU_CULLING
GLU_DISPLAY_MODE
GLU_DOMAIN_DISTANCE
GLU_FILL
GLU_MAP1_TRIM_2
GLU_MAP1_TRIM_3
GLU_NURBS_BEGIN
GLU_NURBS_BEGIN_DATA
GLU_NURBS_COLOR
GLU_NURBS_COLOR_DATA
GLU_NURBS_END
GLU_NURBS_END_DATA
GLU_NURBS_E... |
| SFML-0.0102 | SFML | show |
| XSLoader::load('SFML', $VERSION) |
| SIL-Shoe-1.37 | SIL::Shoe | show |
| $VERSION = 1.37 |
| SNMP-Util-1.8 | SNMP::Util_env | show |
| $ENV{'MIBDIRS'} = '/usr/local/lib/share/snmp/mibs' |
| SReview-0.4.2 | SReview | show |
| $VERSION = "0.4.2" |
| Salvation-0.9913 | URMS | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestMgmtControls | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestLoader | show |
| -1 |
| Salvation-0.9913 | URMS::Services::UserInfoWindow | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow::DataSet | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow::Hooks::Type::2 | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow::Hooks::Type::2::Defaults::M | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow::Defaults::M | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow::Defaults::C | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow::Defaults::OutputProcessor | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestInfoWindow::Defaults::V | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestMgmtControls::DataSet | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestMgmtControls::Defaults::M | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestMgmtControls::Defaults::C | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestMgmtControls::Defaults::OutputProcessor | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestMgmtControls::Defaults::V | show |
| -1 |
| Salvation-0.9913 | URMS::Services::UserInfoWindow::DataSet | show |
| -1 |
| Salvation-0.9913 | URMS::Services::UserInfoWindow::Defaults::M | show |
| -1 |
| Salvation-0.9913 | URMS::Services::UserInfoWindow::Defaults::C | show |
| -1 |
| Salvation-0.9913 | URMS::Services::UserInfoWindow::Defaults::OutputProcessor | show |
| -1 |
| Salvation-0.9913 | URMS::Services::UserInfoWindow::Defaults::V | show |
| -1 |
| Salvation-0.9913 | URMS::Services::RequestLoader::DataSet | show |
| -1 |
| Salvation-0.9913 | Salvation | show |
| -1 |
| Salvation-0.9913 | Salvation::CLI | show |
| -1 |
| Salvation-0.9913 | Salvation::System | show |
| -1 |
| Salvation-0.9913 | Salvation::Stuff | show |
| -1 |
| Salvation-0.9913 | Salvation::SharedStorage | show |
| -1 |
| Salvation-0.9913 | Salvation::Service | show |
| -1 |
| Salvation-0.9913 | Salvation::Roles::SystemReference | show |
| -1 |
| Salvation-0.9913 | Salvation::Roles::ServiceState | show |
| -1 |
| Salvation-0.9913 | Salvation::Roles::AppArgs | show |
| -1 |
| Salvation-0.9913 | Salvation::Roles::DataSet | show |
| -1 |
| Salvation-0.9913 | Salvation::Roles::SharedStorage | show |
| -1 |
| Salvation-0.9913 | Salvation::Roles::ServiceReference | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::Model | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::Intent | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::DataSet | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::OutputProcessor | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::Controller | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::Hook | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::State | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::View | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::View::Stack | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::View::SimpleCache | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::View::Stack::Frame | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::View::Stack::Parser | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::View::Stack::Frame::List | show |
| -1 |
| Salvation-0.9913 | Salvation::Service::View::Stack::Convert::To::XML | show |
| -1 |
| Salvation-AnyNotify-0.01 | Salvation::AnyNotify::Plugin::Config | show |
| method get( Str{1,} key ) {
my $cached_key = "cacheddata:${key}";
return $self -> { $cached_key } if exists $self -> { $cached_key };
my $data = $self -> data();
foreach my $part ( split( /\./, $key ) ) {
if( Salvatio... |
| Salvation-AnyNotify-0.01 | Salvation::AnyNotify::Plugin::Bus | show |
| method notify( Str{1,} channel, Str{1,} data ) {
my $core = $self -> core();
my $bus = $core -> config() -> get( 'bus' );
return $core -> $bus() -> bus_notify( $channel, $data );
}
1 |
| Salvation-AnyNotify-Plugin-Daemon-0.02 | Salvation::AnyNotify::Plugin::Daemon | show |
| method start() {
$self -> { 'queue' } = [];
}
method enqueue( CodeRef|Str code ) {
push( @{ $self -> { 'queue' } }, $code );
return;
}
method run() {
my $daemon_meta = $self -> daemon_meta();
Salvation::DaemonDecl::Back... |
| Salvation-AnyNotify-Plugin-Graphite-0.03 | Salvation::AnyNotify::Plugin::Graphite | show |
| method graphite_ttl() {
return (
$self -> core() -> config() -> get( 'graphite.connection_ttl' )
// $self -> default_graphite_ttl()
);
}
method start() {
$self -> { 'monitor' } = [];
}
method monitor( Str{1,}... |
| Salvation-AnyNotify-Plugin-Graphite-0.03 | Salvation::AnyNotify::Plugin::Graphite::Monitor::Discontinuity | show |
| method add(
Str{1,}|ArrayRef[Str{1,}]{1,} :target!, Num :step_threshold,
Str{1,} :from, Str{1,} :to, Int :memory, Num :avg_threshold,
Num :stddev_threshold, Num :skew_threshold, Num :z_threshold
) {
my $core = $self -> core();
my %... |
| Salvation-AnyNotify-Plugin-Monitor-0.01 | Salvation::AnyNotify::Plugin::Monitor | show |
| method start() {
my $core = $self -> core();
my $monitor = $core -> config() -> get( 'monitor' );
Salvation::TC -> assert( $monitor, 'HashRef[ArrayRef[HashRef|ArrayRef]]' );
my $daemon = $core -> daemon();
$daemon -&... |
| Salvation-AnyNotify-Plugin-Server-0.01 | Salvation::AnyNotify::Plugin::Server | show |
| method bus_notify( Str{1,} channel, Str{1,} data ) {
Salvation::DaemonDecl::Backend -> write_to(
$self -> core() -> daemon() -> daemon_meta(),
$self -> pid(),
pack( 'N', length( $channel ) )
. $channel
... |
| Salvation-DaemonDecl-0.03 | Salvation::DaemonDecl::Backend | show |
| method add_worker( HashRef meta, HashRef(
Str :name!, CodeRef :main!, Int :max_instances!, CodeRef :log,
Salvation::DaemonDecl::Transports :transport, CodeRef :reap, CodeRef :wrapper
) descr ) {
if( exists $meta -> { 'workers' } -> { $d... |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Connector | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Hooks | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::MethodDescription | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Role | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Field | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Spec | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Iterator | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::ForRoles | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Iterator::Compliance | show |
| -1 |
| Salvation-MacroProcessor-0.93 | Salvation::MacroProcessor::Meta::Role | show |
| -1 |
| Salvation-PluginCore-0.01 | Salvation::PluginCore | show |
| method load_plugin( Str{1,} :infix!, Str{1,} :base_name! ) {
$base_name = camelize( $base_name );
foreach my $class ( @{ $self -> linearized_isa() } ) {
my $base_class = "${class}::${infix}";
my $plugin = "${base_class}::${ba... |
| Salvation-PluginCore-0.01 | Salvation::PluginCore::Object | show |
| method new() {
return bless( {}, ( ref( $self ) || $self ) );
}
method lazy( Str name ) {
return $self -> { $name } if exists $self -> { $name };
my $builder = "build_${name}";
return $self -> { $name } = $self -> $builder... |
| Salvation-PluginCore-0.01 | Salvation::PluginCore::Plugin | show |
| method new( Salvation::PluginCore :core!, Str{1,} :base_name! ) {
$self = $self -> SUPER::new();
$self -> { 'core' } = $core;
$self -> { 'base_name' } = $base_name;
$self -> start();
return $self;
}
method load_plugin( ... |
| Schedule-DRMAAc-0.81 | Schedule::DRMAAc | show |
| %EXPORT_TAGS = ( all => [ @EXPORT_OK ] ) |
| Schedule-LongSteps-0.023 | Schedule::LongSteps::Storage | show |
| __PACKAGE__->meta()->make_immutable() |
| Schedule-LongSteps-0.023 | Schedule::LongSteps::Storage::DynamoDB | show |
| __PACKAGE__->meta()->make_immutable() |
| Set-Equivalence-0.003 | Types::Set | show |
| Set -> has_coercion |
| Set-Equivalence-0.003 | Set::Equivalence | show |
| set -> is_null |
| Shishi-Prototype-0.4 | Shishi | show |
| @Shishi::EXPORT_OK = qw( ACTION_FINISH ACTION_REDUCE ACTION_CODE
ACTION_SHIFT ACTION_CONTINUE ACTION_FAIL) |
| Simulation-Automate-1.0.1 | Simulation::Automate::Dictionary | show |
| %Simulation::Automate::Dictionary::make_nice=(
_BUFTYPE => {
title=>'Buffer type',
0=>'Adjustable',
1=>'Fixed-length',
2=>'Multi-exit',
},
_TRAFDIST => {
title=>'Packet gap dist.',
0=>'Poisson',
... |
| Simulation-Automate-1.0.1 | Simulation::Automate::PostProcessors | show |
| print "Loaded plugin show_source\n" |
| Smil-0.898 | QT | show |
| $CHAPTER_ALL = 'all' |
| Smil-0.898 | SMIL::TimelineBase | show |
| @timelineAttributes = ( "id", "begin", "endsync", "end", "repeat" ) |
| Smil-0.898 | SMIL::MediaAttributes | show |
| @mediaAttributes = ( @timeAtts, @systemSwitchAttributes,
"fill", "src", "region", "id", "transition" ) |
| Smil-0.898 | SMIL::SystemSwitches | show |
| @systemSwitchAttributes = ( "system-bitrate",
"system-required",
"system-language" ) |
| Spoon-0.24 | Spoon::Registry | show |
| field wafl => {} |
| Spork-0.21 | Spork | show |
| const config_class => 'Spork::Config' |
| Spork-0.21 | Spork::Plugin | show |
| field formatter => {},-init => '$self->hub->formatter' |
| Spork-S5-0.05 | Spork::S5Theme | show |
| const class_id => 'theme' |
| State-Machine-0.07 | State::Machine | show |
| method next {
my $state = $self->state;
my $next = shift // $state->next;
if ($state && !$next) {
if ($state->transitions->keys->count == 1) {
$next = $state->transitions->keys->get(0);
}
... |
| State-Machine-0.07 | State::Machine::Failure | show |
| method _build_message {
"An unexpected failure has occurred"
}
1 |
| State-Machine-0.07 | State::Machine::State | show |
| method add_transition {
my $trans = pop;
my $name = shift;
if ($trans->isa('State::Machine::Transition')) {
$name //= $trans->name;
$self->transitions->set($name => $trans);
return $trans;
}
St... |
| State-Machine-0.07 | State::Machine::Transition | show |
| method execute {
return if !$self->executable;
my @schedules = (
$self->hooks->get('before'),
$self->hooks->get('during'),
$self->hooks->get('after'),
);
for my $schedule (@schedules) {
... |
| State-Machine-0.07 | State::Machine::Failure::Transition::Missing | show |
| method _build_message {
"Transition missing."
}
1 |
| State-Machine-0.07 | State::Machine::Failure::Transition::Unknown | show |
| method _build_message {
"Transition unknown."
}
1 |
| State-Machine-0.07 | State::Machine::Failure::Transition::Hook | show |
| method _build_message {
"Transition hooking failure."
}
1 |
| State-Machine-0.07 | State::Machine::Failure::Transition::Execution | show |
| method _build_message {
"Transition execution failure."
}
1 |
| Storm-0.240 | Storm::Flood::Plan | show |
| plan 'TIMs::Model::Employee' => (
first_name => FirstName,
last_name => SurName,
hire_date => 'TIMs::Model::Hire',
term_date => sub {
int ( rand time % 2);
}
) |
| Storm-0.240 | Storm::SQL::Fragment::Where::SubgroupStart | show |
| __PACKAGE__->meta()->make_immutable() |
| String-Canonical-1.2 | String::Canonical | show |
| %yx = (
"������������" => "a",
"��������" => "e",
"��������" => "i",
"����������" => "o",
"��������" => "u",
"����������������"
=> "aaooccnnddddyyyy",
) |
| String-Multibyte-1.12 | String::Multibyte::UTF8 | show |
| +{
charset => 'UTF-8',
regexp => '(?:[\x00-\x7F]|[\xC2-\xDF][\x80-\xBF]|' .
'\xE0[\xA0-\xBF][\x80-\xBF]|\xED[\x80-\x9F][\x80-\xBF]|' .
'[\xE1-\xEC\xEE\xEF][\x80-\xBF][\x80-\xBF]|' .
'\xF0[\x90-\xBF][\x80-\xBF][\x80-\xBF]|' .
'[\xF1-\... |
| String-Multibyte-1.12 | String::Multibyte::UHC | show |
| +{
charset => 'UHC',
regexp => '(?:[\x00-\x7F]|[\x81-\xC5][\x41-\x5A\x61-\x7A\x81-\xFE]|'
. '\xC6[\x41-\x52\xA1-\xFE]|[\xC7-\xFE][\xA1-\xFE])',
cmpchar => sub { $_[0] cmp $_[1] },
nextchar => sub {
my $ch = shift;
my... |
| String-Multibyte-1.12 | String::Multibyte::Bytes | show |
| +{
charset => 'bytes',
regexp => '[\x00-\xFF]',
nextchar =>
sub {
my $c = unpack('C', shift);
$c == 0xFF ? undef : pack('C', 1+$c);
},
cmpchar => sub { $_[0] cmp $_[1] },
} |
| String-Multibyte-1.12 | String::Multibyte::Big5Plus | show |
| +{
charset => 'Big-5 Plus',
regexp => '(?:[\x00-\x7F]|[\x81-\xFE][\x40-\x7E\x80-\xFE])',
cmpchar => sub { $_[0] cmp $_[1] },
nextchar => sub {
my $ch = shift;
my $len = length $ch;
if ($len < 1 || 2 < $len) {
... |
| String-Multibyte-1.12 | String::Multibyte::GBK | show |
| +{
charset => 'GBK',
regexp => '(?:[\x00-\x80]|[\x81-\xFE][\x40-\x7E\x80-\xFE])',
cmpchar => sub { $_[0] cmp $_[1] },
nextchar => sub {
my $ch = shift;
my $len = length $ch;
if ($len == 1) {
return $ch eq "\x80"
... |
| String-Multibyte-1.12 | String::Multibyte::UTF32BE | show |
| +{
charset => 'UTF-32BE',
regexp => '(?:\x00\x00[\x00-\xD7\xE0-\xFF][\x00-\xFF]|'
. '\x00[\x01-\x10][\x00-\xFF][\x00-\xFF])',
cmpchar => sub { $_[0] cmp $_[1] },
nextchar => sub {
my $u = unpack('N', $_[0]);
return i... |
| String-Multibyte-1.12 | String::Multibyte::Unicode | show |
| +{
charset => 'Unicode',
regexp => qr/./s,
nextchar => sub { pack 'U', 1 + unpack('U', $_[0]) },
cmpchar => sub { $_[0] cmp $_[1] },
} |
| String-Multibyte-1.12 | String::Multibyte::UTF16BE | show |
| +{
charset => 'UTF-16BE',
regexp => '(?:[\xD8-\xDB][\x00-\xFF][\xDC-\xDF][\x00-\xFF]|' .
'[\x00-\xD7\xE0-\xFF][\x00-\xFF])',
cmpchar => sub {
length($_[0]) <=> length($_[1]) || $_[0] cmp $_[1];
},
nextchar => ... |
| String-Multibyte-1.12 | String::Multibyte::UTF16LE | show |
| +{
charset => 'UTF-16LE',
regexp => '(?:[\x00-\xFF][\xD8-\xDB][\x00-\xFF][\xDC-\xDF]|' .
'[\x00-\xFF][\x00-\xD7\xE0-\xFF])',
cmpchar => sub {
length($_[0]) <=> length($_[1]) ||
unpack('v', $_[0]) <=> unpack('v', $_... |
| String-Multibyte-1.12 | String::Multibyte::EUC_JP | show |
| +{
charset => 'EUC-JP',
regexp => '(?:[\x00-\x7F]|[\x8E\xA1-\xFE][\xA1-\xFE]|' .
'\x8F[\xA1-\xFE][\xA1-\xFE])',
cmpchar => sub {
length($_[0]) <=> length($_[1]) || $_[0] cmp $_[1];
},
nextchar => sub {
my $ch... |
| String-Multibyte-1.12 | String::Multibyte::Johab | show |
| +{
charset => 'Johab',
regexp => '(?:[\x00-\x7F]|[\xD8-\xDE\xE0-\xF9][\x31-\x7E\x91-\xFE]|'
. '\x84[\x44\x46\x47\x4A-\x50\x54\x61\x81\xA1\xC1\xE1]|'
. '[\x85\x86][\x41\x61\x81\xA1\xC1\xE1]|\x87[\x41\x61\x81\xA1]|'
. '[\x88\x8C\x90\x94... |
| String-Multibyte-1.12 | String::Multibyte::ShiftJIS | show |
| +{
charset => 'Shift-JIS',
regexp => '(?:[\x00-\x7F\xA1-\xDF]|' .
'[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])',
cmpchar => sub {
length($_[0]) <=> length($_[1]) || $_[0] cmp $_[1];
},
nextchar => sub {
my $ch ... |
| String-Multibyte-1.12 | String::Multibyte::UTF32LE | show |
| +{
charset => 'UTF-32LE',
regexp => '(?:[\x00-\xFF][\x00-\xD7\xE0-\xFF]\x00\x00|'
. '[\x00-\xFF][\x00-\xFF][\x01-\x10]\x00)',
cmpchar => sub { unpack('V', $_[0]) <=> unpack('V', $_[1]) },
nextchar => sub {
my $u... |
| String-Multibyte-1.12 | String::Multibyte::Grapheme | show |
| +{
charset => 'Default Grapheme Cluster',
regexp => $Grapheme,
} |
| String-Multibyte-1.12 | String::Multibyte::EUC | show |
| +{
charset => 'EUC',
regexp => '(?:[\x00-\x7F]|[\xA1-\xFE][\xA1-\xFE])',
cmpchar => sub { $_[0] cmp $_[1] },
nextchar => sub {
my $ch = shift;
my $len = length $ch;
if ($len < 1 || 2 < $len) {
return undef;
... |
| String-Multibyte-1.12 | String::Multibyte::Big5 | show |
| +{
charset => 'Big-5',
regexp => '(?:[\x00-\x7F]|[\x81-\xFE][\x40-\x7E\xA1-\xFE])',
cmpchar => sub { $_[0] cmp $_[1] },
nextchar => sub {
my $ch = shift;
my $len = length $ch;
if ($len < 1 || 2 < $len) {
ret... |
| String-Multibyte-1.12 | String::Multibyte::EUC_TW | show |
| +{
charset => 'EUC-TW',
regexp => '(?:[\x00-\x7F]|[\xA1-\xFE][\xA1-\xFE]|' .
'\x8E[\xA1-\xB0][\xA1-\xFE][\xA1-\xFE])',
cmpchar => sub {
length($_[0]) <=> length($_[1]) || $_[0] cmp $_[1];
},
nextchar => sub {
... |
| String-Multibyte-1.12 | String::Multibyte::GB18030 | show |
| +{
charset => 'GB18030',
regexp => '(?:[\x00-\x80]|[\x81-\xFE][\x40-\x7E\x80-\xFE]|'
. '[\x81-\xFE][\x30-\x39][\x81-\xFE][\x30-\x39])',
cmpchar => sub {
length($_[0]) <=> length($_[1]) || $_[0] cmp $_[1];
},
next... |
| Sub-Lazy-0.002 | Sub::Lazy | show |
| ENABLED or not ENABLED |
| Syntax-Collector-0.006 | Syntax::Collector | show |
| __FILE__ |
| Syntax-Feature-Ql-0.001000 | Syntax::Feature::Ql | show |
| method install ($class: %args) {
my $target = $args{into};
Devel::Declare->setup_for($target => {
map {
my $name = $_;
($name => {
const => sub {
my $ctx = Context->... |
| Syntax-Feature-Simple-0.002 | Syntax::Feature::Simple | show |
| method install ($class: %args) {
croak q{You cannot use 'simple' as a syntax extension. You need to }
. q{select a specific version, for example 'simple/v1'}
if $class eq __PACKAGE__;
my $target = $args{into};
my @extension... |
| Syntax-Feature-Simple-0.002 | Syntax::Feature::Simple::V1 | show |
| method _available_extensions {
return qw(
function_keyword
moose_param_role_method_sugar
method_keyword
modifier_sugar
);
}
method _can_setup_moose_param_role_method_sugar_ext ($class: $target) {
$class->_ch... |
| Syntax-Feature-Simple-0.002 | Syntax::Feature::Simple::V2 | show |
| method _available_extensions {
return qw(
function_keyword
moose_param_role_method_sugar
method_keyword
modifier_sugar
moose_param_role_body_sugar
);
}
method _can_setup_moose_param_role_body_sugar_ext ($cl... |
| Syntax-Highlight-Perl-1.0 | Syntax::Highlight::Perl | show |
| TRUE |
| Syntax-Highlight-Perl-Improved-1.01 | Syntax::Highlight::Perl::Improved | show |
| TRUE |
| Sys-UniqueID-1.0 | Sys::UniqueID | show |
| $netaddr= sprintf '%02X%02X%02X%02X', (split /\./, hostip) |
| Sys-Utmp-1.8 | Sys::Utmp | show |
| bootstrap Sys::Utmp $VERSION |
| TM-1.56 | package | show |
| <<$driver>>
<<$head>>
sub new {
my $class = shift;
my %options = @_;
my $store = delete $options{store} || new TM;
ref($class) and $class=ref($class);
my $self = $class->SUPER::new(
yyv... |
| TOBYINK-Pod-HTML-0.005 | TOBYINK::Pod::HTML::Helper | show |
| __FILE__ |
| Task-BenchmarkAnything-0.003 | Task::BenchmarkAnything | show |
| $Task::BenchmarkAnything::VERSION = '0.003' |
| Task-Bootstrap-Perl-CPAN-0.004 | Task::Bootstrap::Perl::CPAN | show |
| $Task::Bootstrap::Perl::CPAN::VERSION = '0.003' |
| Task-Bootstrap-Perl-CPAN-0.004 | Task::Bootstrap::Perl::CPAN | show |
| $Task::Bootstrap::Perl::CPAN::VERSION = '0.004' |
| Task-PerlFormance-0.010 | Task::PerlFormance | show |
| $Task::PerlFormance::VERSION = '0.010' |
| Task-Tapper-Hello-World-0.003 | Task::Tapper::Hello::World | show |
| $Task::Tapper::Hello::World::VERSION = '0.003' |
| Telugu-TGC-0.08 | Telugu::TGC | show |
| method TGC( Str $string ) {
if ( $string =~ $parser ) {
$/{String}->X();
}
return @result;
}
1 |
| Template-Lace-0.017 | TodoListApp | show |
| __PACKAGE__->run_if_script |
| Term-Colormap-0.19 | Term::Colormap::Brewer | show |
| add_mapping('ylorrd-9', [ 230, 229, 222, 215, 209, 202, 160, 124, 1, ]) |
| Term-Spinner-Color-0.06 | Term::Spinner::Color::AllFramesDemo | show |
| exit main(\@ARGV) |
| Test-DependentModules-0.27 | MyModule | show |
| $VERSION = 1 |
| Test-DependentModules-0.27 | MyModule | show |
| $VERSION = 1 |
| Test-DependentModules-0.27 | MyModule | show |
| $VERSION = 1 |
| Test-DependentModules-0.27 | MyModule | show |
| $VERSION = 1 |
| Test-DependentModules-0.27 | MyModule | show |
| $VERSION = 1 |
| Test-DependentModules-0.27 | MyModule | show |
| $VERSION = 1 |
| Test-DependentModules-0.27 | MyModule | show |
| $VERSION = 1 |
| Test-Instance-DNS-0.001 | Test::Instance::DNS::Server | show |
| Test::Instance::DNS::Server->_run_if_script |
| Test-Mountebank-0.001 | Test::Mountebank::Imposter | show |
| method stub() {
my $stub = Test::Mountebank::Stub->new(@_);
$self->add_stub($stub);
return $stub;
}
method as_hashref() {
croak "An imposter must have at least one stub" if $self->has_no_stubs;
return {
stubs =>... |
| Test-Mountebank-0.001 | Test::Mountebank::Client | show |
| method create_imposter(:$port = 4525, :$protocol = 'http') {
return Test::Mountebank::Imposter->new(port => $port, protocol => $protocol);
}
method mb_url() {
return $self->base_url . ":" . $self->port;
}
method is_available() {
... |
| Test-Mountebank-0.001 | Test::Mountebank::Stub | show |
| method predicate(@args) {
$self->add_predicate(Test::Mountebank::Predicate::Equals->new(@args));
return $self;
}
method response(@args) {
$self->add_response(Test::Mountebank::Response::Is->new(@args));
return $self;
}
method... |
| Test-Mountebank-0.001 | Test::Mountebank::Response::Is | show |
| method as_hashref() {
my $hashref = ();
$hashref->{body} = $self->body if $self->body;
$hashref->{statusCode} = $self->status_code if $self->status_code;
if ($self->headers) {
my %headers = $self->headers-&g... |
| Test-PostgreSQL-1.27 | Test::PostgreSQL | show |
| method BUILD($) {
try { $self->pg_ctl or $self->postmaster } catch { die $_ };
if (defined $self->uid and $self->uid == 0) {
die "uid() must be set to a non-root user id.";
}
if (not defined($self->uid) and $self-&... |
| Text-Editor-Vip-0.08.1 | Text::Editor::Vip::Buffer::Plugins::PageUpDown | show |
| die "Not yet ported to Vip!\n" :
sub SetPageSize
{
$_[0]->{'Text::Editor::Vip::Buffer::Plugins::PageUpDown::Page_SIZE'} = $_[1] || 40;
}
sub GetPageSize
{
return ($_[0]->{'Text::Editor::Vip::Buffer::Plugins::PageUpDown::PAGE_SIZE'} || 40) ;... |
| Tie-MooseObject-0.0001 | Tie::MooseObject | show |
| class Tie::MooseObject {
use MooseX::Has::Sugar 0.0405;
use MooseX::Types::Moose 0.12 qw( Bool Str HashRef CodeRef Object );
use Moose::Util::TypeConstraints 1.03 qw( enum );
use List::Util 1.23 qw( first );
use Carp qw( croak );
... |
| Tilt-Email-BlueHornet-0.001 | Tilt::Email::BlueHornet | show |
| method _call($data) {
my $xml_data = {
authentication => {
api_key => $self->api_key,
shared_secret => $self->api_secret,
response_type => 'xml',
no_halt => 0
},
data => {
met... |
| Time-C-0.024 | Time::P | show |
| fun strptime ($str, $fmt, :$locale = 'C', :$strict = 1, :$struct = {}) {
my %parse = ();
my @res = _compile_fmt($fmt, locale => $locale);
croak "Could not match '%s' using '%s'.", $str, $fmt if not @res;
@res = (qr/^/, @res, qr/$/) i... |
| Time-C-0.024 | Time::R | show |
| method new ($c: $start, :$end = undef, :$years = 0, :$months = 0, :$weeks = 0, :$days = 0, :$hours = 0, :$minutes = 0, :$seconds = 0) {
bless({
start => $start,
end => $end,
years => $years,
months =&g... |
| Time-C-0.024 | Time::C | show |
| fun _get_tz ($offset) {
return 'UTC' unless $offset;
return $tz_offset{$offset} if defined $tz_offset{$offset};
my $min = $offset % 60;
my $hour = int $offset / 60;
my $sign = '+';
if ($hour < 0) { $sign = '-'; $hour = -$hour;... |
| Time-C-0.024 | Time::F | show |
| fun strftime ($t, $fmt, :$locale = 'C') {
my $str = '';
my $pos = 0;
while (defined(my $tok = get_fmt_tok($fmt, $pos))) {
if (exists $formatter{$tok}) {
$str .= $formatter{$tok}->($t, $locale) // '';
} elsif ($to... |
| Time-C-0.024 | Time::D | show |
| method new ($c: $base, $comp = $base) {
bless { base => $base, comp => $comp }, $c;
}
method _setter ($d: $key, $new) {
return sub {
$d->{$key} = $_[0];
return $d if defined $new;
return $_[0];
};
}
method _c... |
| Time-C-0.024 | Time::C::Util | show |
| fun get_fmt_tok ($fmt, $pos) {
return undef if $pos >= length $fmt;
my $tok_len = substr($fmt, $pos, 1) eq '%' ? 2 : 1;
my $tok = substr $fmt, $pos, $tok_len;
while (($tok eq '%O') or ($tok eq '%E') or ($tok eq '%-')) {
$tok ... |
| Tk-Pod-0.9943 | Tk::Pod::FindPods | show |
| print Data::Dumper->Dumpxs([Tk::Pod::FindPods->new->pod_find(-categorized => 0, -usecache => 0)],[]) |
| Try-Tiny-Tiny-0.002 | Try::Tiny::Tiny | show |
| $effective |
| Types-UUID-0.004 | Types::UUID | show |
| $type->coercion->freeze |
| UR-0.47 | UR::BoolExpr | show |
| *get_normalized_rule_equivalent = \&normalize |
| UR-0.47 | UR::Doc::Section | show |
| class UR::Doc::Section {
is => 'UR::Object',
has => [
title => {
is => 'Text',
is_optional => 1,
},
content => {
is => 'Text',
doc => 'pod content for ... |
| Util-Timeout-0.01 | Util::Timeout | show |
| default_export timeout sublike {
my ($seconds, $code) = @_;
$seconds = ceil($seconds);
return 0 unless $seconds > 0;
return 0 unless defined $code && ref($code) eq 'CODE';
!timeout_call( $seconds, $code );
}
default_export retry subl... |
| Util-Underscore-v1.4.2 | package | show |
| $blow_up->() |
| VRML-1.10 | VRML::Color | show |
| %X11Color = (
"aliceblue" => [240,248,255],
"antiquewhite" => [250,235,215],
"aqua" => [0,255,255],
"aquamarine" => [127,255,212],
"azure" => [240,255,255],
"beige" => [245,245,220],
"bisque" => [255,228,196],
"black" => [0,0,0],
"... |
| Verilog-CodeGen-0.9.4 | Verilog::CodeGen::Gui | show |
| @Verilog::CodeGen::EXPORT =qw() |
| Vim-X-1.3.0 | MyMooVim | show |
| vim_func 'PostfixToggle',
range => 1,
sub {
},
1 |
| VoiceXML-Client-1.01 | VoiceXML::Client::DeviceHandle | show |
| %Defaults = (
'timeout' => 6,
'numrepeat' => 3,
'device' => 'DIALUP_LINE',
'tempdir' => '/tmp',
'autostop' => 1,
) |
| VoiceXML-Client-1.01 | VoiceXML::Client::Engine | show |
| Execute the choice's goto or throw, leaving the FIA.
// The grammar belongs to another form (or menu).
Transition to that form (or menu), carrying the utterance
to the other form (or menu)'s FIA.
}
// Process an utterance... |
| WAIT-1.800 | WAIT | show |
| bootstrap WAIT $VERSION |
| WWW-Baidu-0.06 | WWW::Baidu | show |
| sub _ {
my $s = shift;
utf8::is_utf8($s) ? encode('GBK', $s) : $s;
}
1 |
| WWW-Getsy-0.999007 | WWW::Getsy::Types | show |
| coerce RequestMethod,
from Str,
via {
lc $_;
} |
| WWW-Google-Contacts-0.39 | WWW::Google::Contacts::InternalTypes | show |
| coerce YomiStr, from HashRef, via {
$_->{content};
} |
| WWW-Google-Contacts-0.39 | WWW::Google::Contacts::Types | show |
| coerce Photo, from HashRef, via {
require WWW::Google::Contacts::Photo;
WWW::Google::Contacts::Photo->new($_)
} |
| WWW-Hashbang-Pastebin-0.004 | WWW::Hashbang::Pastebin | show |
| true |
| WWW-Kickstarter-v1.14.0 | WWW::Kickstarter::HttpClient | show |
| die "Place holder for documentation. Not an actual module" |
| WWW-Kickstarter-v1.14.0 | WWW::Kickstarter::JsonParser | show |
| die "Place holder for documentation. Not an actual module" |
| WWW-Link-0.036 | pm | show |
| merge ($$) {
my ($first, $second) = @_;
croak "link urls must be identical for merge"
unless $first->{"url"} eq $second->{"url"};
my $result=new WWW::Link $first->{"url"};
($first->{"last_refresh"} > $second->{"last_refre... |
| WWW-Link-0.036 | WWW::Link::Change | show |
| $VERSION = sprintf ( "%d.%02d", $REVISION =~ /(\d+).(\d+)/ ) |
| WWW-Link-0.036 | WWW::Link::Repair::Mapper | show |
| new {
my $class = shift;
my $self = bless {}, $class;
my $self->{"translations"}=[];
}
add_translation ($) {
}
package WWW::Link::Repair::Mapper::Translation;
sub new ($$@) {
my $class=shift;
my $self = bless {}, $class;
my $self->{... |
| WWW-ORCID-0.0402 | WWW::ORCID::API::v2_0 | show |
| __PACKAGE__->install_helper_methods |
| WWW-ORCID-0.0402 | WWW::ORCID::API::v2_0_public | show |
| __PACKAGE__->install_helper_methods |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Section | show |
| with 'WWW::Phanfare::Class::Role::Attributes' |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Image | show |
| with 'WWW::Phanfare::Class::Role::Attributes' |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Year | show |
| method _idnames {
my $albumlist = $self->api->GetAlbumList(target_uid=>$self->uid);
$self->_idnamepair(
$albumlist->{albums}{album},
'album',
{ album_start_date=>$self->name },
);
}
method _delete {
return if $... |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Site | show |
| method _idnames {
my $albumlist =
$self->api->GetAlbumList(target_uid=>$self->uid)->{albums}{album};
$albumlist = [ $albumlist ] unless ref $albumlist eq 'ARRAY';
my %year;
for my $album ( @$albumlist ) {
my $num = substr $... |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Rendition | show |
| method _idnames {
my $imageinfo = $self->parent->_info->{images}{imageinfo};
return [] unless $imageinfo;
$imageinfo = [ $imageinfo ] unless ref $imageinfo eq 'ARRAY';
my @images;
for my $image ( @$imageinfo ) {
$image = {
%$... |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Album | show |
| with 'WWW::Phanfare::Class::Role::Attributes' |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Role::Attributes | show |
| method setattributes ( HashRef $data ) {
my %attr = map {
ref $data->{$_}
? ()
: ( $_ => $data->{$_} )
} keys %$data;
$self->_set_attr( %attr );
}
method attribute ( Str $key, Str $value? ) {
return $self->_attr->... |
| WWW-Phanfare-Class-0.03 | WWW::Phanfare::Class::Role::Node | show |
| method uid { $self->parent->uid }
method api { $self->parent->api }
method _treesearch ( Ref $tree, ArrayRef $path ) {
my @part = @$path;
my $node = $tree;
for my $part ( @$path ) {
if ( ref $part eq 'HASH' ) {
my($key,$va... |
| WWW-Restaurant-Menu-0.11 | WWW::Restaurant::Menu | show |
| WWW-Restaurant-Menu-0.11 | WWW::Restaurant::Menu::Item | show |
| WWW-Restaurant-Menu-0.11 | WWW::Restaurant::DE::Munich::Edison::Menu::Lunch | show |
| WWW-RiotGames-LeagueOfLegends-0.0001 | WWW::RiotGames::LeagueOfLegends | show |
| method champion_mastery( Int :$summoner_id, Int :$champion_id = 0, Str :$type = 'champion-masteries' ) {
my $url = $champion_id ?
sprintf '%s/lol/champion-mastery/v%d/champion-masteries/by-summoner/%d/by-champion/%d', $self->api_url, 3, $summone... |
| WWW-SFDC-0.37 | WWW::SFDC::Apex | show |
| method executeAnonymous ($code, :$debug = 1) {
my $callResult = $self->_call(
'executeAnonymous',
SOAP::Data->name(string => $code),
(
$debug
? SOAP::Header->name('DebuggingHeader' => \SOAP::Data->name(
... |
| WWW-SFDC-0.37 | WWW::SFDC::Metadata | show |
| method listMetadata (@_) {
INFO "Listing Metadata...\t";
my @result;
my @queryData = map {SOAP::Data->new(name => "queries", value => $_)} @_;
while (my @items = splice @queryData, 0, 3) {
push @result, $$_{fileName} for @{$self-&g... |
| WWW-SFDC-0.37 | WWW::SFDC::Partner | show |
| method _prepareSObjects (@_) {
TRACE "objects for operation", Dumper \@_;
return map {
my $obj = $_;
my @type;
if ($obj->{type}) {
@type = SOAP::Data->name('type' => $obj->{type});
delete $obj->{type}... |
| WWW-SFDC-0.37 | WWW::SFDC::Manifest | show |
| method _splitLine ($line) {
$line =~ s".*src/"";
$line =~ s/[\n\r]//g;
$line =~ s"\\"/"g;
my %result = (extension => "");
($result{type}) = $line =~ m"^(\w+)/" or LOGDIE "Line $line doesn't have a type.";
$result{folder} = $1 if ... |
| WWW-SFDC-0.37 | WWW::SFDC::Role::CRUD | show |
| method _queryMore ($locator) {
return $self->_call(
'queryMore',
SOAP::Data->name(queryLocator => $locator),
)->result;
}
method _getQueryResults ($request) {
TRACE Dumper $request;
return ref $request->{records} eq 'ARRAY'... |
| WWW-Scripter-Plugin-JavaScript-SpiderMonkey-0.003 | WWW::Scripter::Plugin::JavaScript::SpiderMonkey | show |
| exit exit exit exit exit exit exit exit exit exit exit exit exit return 1 |
| WWW-StaticBlog-0.02 | WWW::StaticBlog::Compendium | show |
| method sorted_posts()
{
return $self->_sorted_posts(
sub {
DateTime->compare(
$_[0]->posted_on(),
$_[1]->posted_on(),
)
}
);
}
method _sort_posts_by_date_descendi... |
| WWW-StaticBlog-0.02 | WWW::StaticBlog::Tag | show |
| method compendium($compendium?)
{
$WWW::StaticBlog::Tag::compendium = $compendium
if defined $compendium && UNIVERSAL::isa($compendium, 'WWW::StaticBlog::Compendium');
return $WWW::StaticBlog::Tag::compendium;
}
method post_count()
{
... |
| WebDyne-1.250 | WebDyne::Constant | show |
| $_=\%Constant |
| WebDyne-1.250 | WebDyne::Install::Constant | show |
| $_=\%Constant |
| WebDyne-1.250 | WebDyne::Install::Apache::Constant | show |
| $_=\%Constant |
| WebDyne-1.250 | WebDyne::Err::Constant | show |
| $_=\%Constant |
| WebDyne-Chain-1.050 | WebDyne::Chain::Constant | show |
| $_=\%Constant |
| WebDyne-Install-Lighttpd-1.009 | WebDyne::Install::Lighttpd::Constant | show |
| $_=\%Constant |
| WebDyne-Request-FastCGI-1.021 | WebDyne::Request::FastCGI::Constant | show |
| $_=\%Constant |
| WebDyne-Session-1.044 | WebDyne::Session::Constant | show |
| $_=\%Constant |
| WebService-Algolia-0.1002 | WebService::Algolia | show |
| method BUILD(...) {
$self->ua->default_header('X-Algolia-Application-Id' => $self->application_id);
$self->ua->default_header('X-Algolia-API-Key' => $self->api_key);
}
method get_indexes {
return $self->get('/indexe... |
| WebService-Auth0-0.002 | WebService::Auth0::Management::UserBlocks | show |
| with 'WebService::Auth0::Management::Role::Search',
'WebService::Auth0::Management::Role::All',
'WebService::Auth0::Management::Role::Delete',
'WebService::Auth0::Management::Role::Get',
'WebService::Auth0::Management::Role::Update',
sub path_suf... |
| WebService-Auth0-0.002 | WebService::Auth0::Management::Jobs | show |
| with 'WebService::Auth0::Management::Role::Get',
sub path_suffix { 'jobs' }
sub errors {
my ($self, $job_id) = @_;
return $self->GET($self->uri_for($job_id, 'errors'));
}
sub user_imports {
my ($self, $params) = @_;
return $self->POST_... |
| WebService-Coinbase-0.0200 | WebService::Coinbase | show |
| method get_accounts { $self->get('/accounts') }
method get_account($id) { $self->get("/accounts/$id") }
method create_account(HashRef $data) {
return $self->post("/accounts", { account => $data });
}
method modify_account($id, HashRef $... |
| WebService-ConstructorIO-0.04 | WebService::ConstructorIO | show |
| method BUILD(...) {
$self->ua->default_headers->authorization_basic($self->api_token);
$self->ua->ssl_opts( verify_hostname => 0 );
}
method verify() {
my $response = $self->get("/v1/verify?autocomplete_key=" . $self->au... |
| WebService-Europeana-0.0.3 | WebService::Europeana | show |
| method search(Str :$query, Str :$profile = "standard", Int :$rows = 12, Int :$start = 1, Str :$reusability, Str|ArrayRef :$qf ) {
my $ua = LWP::UserAgent->new();
my $query_string = undef;
my $response = undef;
my $json_result = undef;... |
| WebService-FaucetBOX-0.01 | WebService::FaucetBOX | show |
| method send($to, $amount, :$referral = 'false') {
return $self->post("/send", {
to => $to,
amount => $amount,
referral => $referral
});
}
method getBalance {
return $self->post( "/balance" );
}
method getCurren... |
| WebService-Freshservice-0.004 | WebService::Freshservice | show |
| method agent(...) {
return $self->_user(@_);
}
method agents(...) {
return $self->_search(@_);
}
1 |
| WebService-Freshservice-0.004 | WebService::Freshservice::API | show |
| method _build__ua {
my $ua = LWP::UserAgent->new();
$ua->agent('WebService-Freshservice');
$ua->timeout(60);
$ua->env_proxy;
$ua->default_headers->push_header( 'Content-Type' => "application/json" );
$ua->default_heade... |
| WebService-Freshservice-0.004 | WebService::Freshservice::Agent | show |
| method _build__raw {
return $self->api->get_api( "agents/".$self->id.".json" );
}
method _build_user {
my $caller = substr((caller 1)[3],32);
return $self->_raw->{agent}{user}{$caller};
}
method _build_user_override {
my $caller =... |
| WebService-Freshservice-0.004 | WebService::Freshservice::User | show |
| method _build_custom_field {
my $fields = { };
while (my ( $key, $value ) = each %{ $self->_raw->{user}{custom_field} } ) {
$fields->{$key} = WebService::Freshservice::User::CustomField->new(
id => $self->id,
api... |
| WebService-Freshservice-0.004 | WebService::Freshservice::User::CustomField | show |
| method update_custom_field {
my $data->{user}{custom_field}{$self->field} = $self->value;
$self->api->put_api( "itil/requesters/".$self->id.".json", $data);
return 1;
}
method TO_JSON {
return $self->value;
}
1 |
| WebService-Gitter-2.2.0 | WebService::Gitter | show |
| method get_me() {
return $self->get( "/user/me?access_token=" . $self->api_key );
}
method list_groups() {
return $self->get( "/groups?access_token=" . $self->api_key );
}
method rooms_under_group($group_id) {
return $self->... |
| WebService-Google-Language-0.14 | WebService::Google::Language | show |
| $VERSION = eval $VERSION |
| WebService-HabitRPG-0.30 | WebService::HabitRPG | show |
| method _decode_json($string) {
warn "Decoding JSON: $string" if $DEBUG;
$self->_last_json($string);
my $result = $json->decode( $string );
if ($DEBUG) {
warn "JSON decoded to: ", Dumper($result), "\n";
}
... |
| WebService-Lob-0.0107 | WebService::Lob | show |
| method BUILD(...) {
$self->ua->credentials('api.lob.com:443', '', $self->api_key, '');
}
method get_states {
my $result = $self->get($self->states_uri);
return $result->{data} if $result;
}
method get_countries {
my $re... |
| WebService-Pixabay-2.2.3 | WebService::Pixabay | show |
| method image_search(
: $q = "yellow flower",
: $lang = "en",
: $id = "",
: $response_group = "image_details",
: $image_type = "all",
: $orientation = "all",
: $category = "",
... |
| WebService-SOS-0.01 | WebService::SOS::Capabilities | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::Observations | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::SensorDescription | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::Exception | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::SWEField | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::Capabilities::Offering | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::Capabilities::Parameter | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::Capabilities::Operation | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::SensorDescription::Classifiers | show |
| finalize_class() |
| WebService-SOS-0.01 | WebService::SOS::SensorDescription::Identifiers | show |
| finalize_class() |
| WebService-SendGrid-1.03 | WebService::SendGrid | show |
| method _generate_request (Str $path, HashRef $data) {
$data->{$_} = $self->$_ for qw(api_user api_key);
my $uri = URI->new('https:');
$uri->query_form(%$data);
my $req = HTTP::Request->new;
$req->method('POST');
$req->... |
| WebService-SendGrid-1.03 | WebService::SendGrid::Mail | show |
| method send {
croak "No content" unless ( $self->text || $self->html );
my %data;
for my $attr ( $self->meta->get_all_attributes ) {
next unless __PACKAGE__ eq $attr->definition_context->{package};
my $name = $attr->name;... |
| WebService-SendGrid-1.03 | WebService::SendGrid::Profile | show |
| method BUILD {
my $req = $self->_generate_request('/api/profile.get.json', {});
my $res = $self->_dispatch_request($req);
return $self->_process_error($res) if $res->code != 100;
my $content = ${ decode_json $res->content }[0];
... |
| WebService-SiftScience-0.0100 | WebService::SiftScience | show |
| method get_score (Str $user_id) {
return $self->get($self->_score_uri($user_id) .
'?api_key=' . $self->api_key);
}
method create_event (Str $user_id, Str $type, Maybe[HashRef] $data = {}) {
return $self->post($self->events_... |
| WebService-SlimTimer-0.005 | WebService::SlimTimer | show |
| method login(Str $login, Str $password) {
my $res = $self->_post(POST => 'http://slimtimer.com/users/token',
{ user => { email => $login, password => $password } },
error => "Failed to login as \"$login\""
... |
| WebService-SlimTimer-0.005 | WebService::SlimTimer::Types | show |
| coerce OptionalTimeStamp,
from Str,
via { defined $_ ? _DateTime_from_YAML($_) : undef } |
| WebService-SmartyStreets-0.0105 | WebService::SmartyStreets | show |
| method verify_address(
Str :$street!,
Str :$street2 = '',
Str :$city!,
Str :$state!,
Str :$zipcode = '',
Int :$candidates = 2
) {
my $results = $self->post($self->base_url, [{
street => $street,
str... |
| WebService-Snapcard-0.0001 | WebService::Snapcard | show |
| method get_merchant_balance { $self->get('/merchant/balance') }
method get_invoices { $self->get('/invoices') }
1 |
| WebService-Spotify-1.003 | WebService::Spotify | show |
| method get ($method, %args) {
my $uri = $self->_uri( $method, %args );
my $headers = $self->_auth_headers;
my $response = $self->user_agent->get( $uri->as_string, %$headers );
$self->_log("GET", $uri->as_string);
$s... |
| WebService-Spotify-1.003 | WebService::Spotify::OAuth2 | show |
| method get_cached_token {
my $token_info;
if ($self->cache_path) {
if (my $fh = IO::File->new('< ' . $self->cache_path)) {
local $/;
$token_info = from_json( <$fh> );
$fh->close;
}
$token_info =... |
| WebService-Strava-0.06 | WebService::Strava | show |
| method activity($id) {
return WebService::Strava::Athlete::Activity->new(id =>$id, auth => $self->auth);
}
method list_activities(:$activities = 25, :$page = 1, :$before?, :$after?) {
my $url = "/athlete/activities?per_page=$activities&p... |
| WebService-Strava-0.06 | WebService::Strava::Segment | show |
| method leaderboard(:$activities = 25, :$page = 1, :$gender?, :$age_group?, :$weight_class?, :$following?, :$club?, :$date_range?, ) {
my $url = "/segments/$self->{id}/leaderboard?per_page=$activities&page=$page";
$url .= "&age_group=$age_group" if ... |
| WebService-Strava-0.06 | WebService::Strava::Auth | show |
| method setup() {
if (! $self->config->{auth}{client_id} ) {
$self->config->{auth}{client_id} = $self->prompt("Paste enter your client_id");
}
if (! $self->config->{auth}{client_secret} ) {
$self->config->{auth}{... |
| WebService-Strava-0.06 | WebService::Strava::Athlete::Segment_Effort | show |
| method _instantiate($type, $key, $data) {
$self->{$key} = "WebService::Strava::$type"->new(auth => $self->auth, id => $data->{id}, _build => 0);
return;
}
method retrieve() {
$self->_build_effort();
}
1 |
| WebService-Strava-0.06 | WebService::Strava::Athlete::Activity | show |
| method _instantiate($type, $key, $data) {
if (ref($data) eq "ARRAY") {
my $index = 0;
foreach my $item (@{$data}) {
@{$data}[$index] = "WebService::Strava::$type"->new(auth => $self->auth, id => $item->{id}, _build => 0);... |
| WebService-Strava-0.06 | WebService::Strava::Athlete::Gear | show |
| method _build_gear() {
my $gear = $self->auth->get_api("/gear/$self->{id}");
foreach my $key (keys %{ $gear }) {
$self->{$key} = $gear->{$key};
}
return;
}
method retrieve() {
$self->_build_gear();
}
1 |
| WebService-Stripe-1.0300 | WebService::Stripe | show |
| method get_bitcoin_receivers(HashRef :$query, :$headers) {
return $self->get( "/v1/bitcoin/receivers", $query, headers => $headers );
}
method create_bitcoin_receiver(HashRef $data, :$headers) {
return $self->post( "/v1/bitcoin/receivers... |
| Whatever-0.23 | Whatever | show |
| __PACKAGE__ if 'first require' |
| Win32-Die-0.03 | Win32::Die | show |
| $SIG{__DIE__} = sub {
return unless !defined $ENV{PROMPT}
or (defined $ENV{CMDLINE} and $ENV{CMDLINE} eq 'WIN');
print shift, "Hit any key to close this window...";
ReadMode 4;
ReadKey 0;
ReadMode 0;
exit;
... |
| Win32-EnumPrinters-0.01 | Win32::EnumPrinters | show |
| %EXPORT_TAGS = (
'dmicmethod' => [
'DMICMMETHOD_NONE',
'DMICMMETHOD_SYSTEM',
'DMICMMETHOD_DRIVER',
... |
| Win32-Fmode-1.0.6 | Win32::Fmode | show |
| print "All tests passed" |
| Wizard-LDAP-0.1008 | Wizard::LDAP::Config | show |
| $Wizard::LDAP::Config::config = {
'ldap-prefs-file' => '/etc/Wizard-LDAP/prefs'
} |
| WordNet-Extend-1.000 | WordNet::Extend | show |
| $VERSION = '1.000' |
| Wx-Demo-0.22 | Wx::DemoModules::wxPasswordEntryDialog | show |
| defined &Wx::PasswordEntryDialog::new |
| Wx-Demo-0.22 | Wx::DemoModules::wxPropertyGrid | show |
| eval { return Wx::_wx_optmod_propgrid(); } |
| Wx-Demo-0.22 | Wx::DemoModules::wxFontPickerCtrl | show |
| defined &Wx::FontPickerCtrl::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxColourPickerCtrl | show |
| defined &Wx::ColourPickerCtrl::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxWebView | show |
| eval { return Wx::_wx_optmod_webview(); } |
| Wx-Demo-0.22 | Wx::DemoModules::wxRibbonControl | show |
| eval { return Wx::_wx_optmod_ribbon(); } |
| Wx-Demo-0.22 | Wx::DemoModules::wxOverlay | show |
| ( $@ ) ? 0 : 1 |
| Wx-Demo-0.22 | Wx::DemoModules::wxAboutDialog | show |
| defined &Wx::AboutBox ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxNativeTreeListCtrl | show |
| defined &Wx::PlTreeListItemComparator::new |
| Wx-Demo-0.22 | Wx::DemoModules::wxMediaCtrl | show |
| defined &Wx::MediaCtrl::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxRichTextCtrl | show |
| defined &Wx::RichTextCtrl::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxDirPickerCtrl | show |
| defined &Wx::DirPickerCtrl::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxFilePickerCtrl | show |
| defined &Wx::FilePickerCtrl::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxCollapsiblePane | show |
| defined &Wx::CollapsiblePane::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxSimpleHtmlListBox | show |
| defined &Wx::SimpleHtmlListBox::new ? 1 : 0 |
| Wx-Demo-0.22 | Wx::DemoModules::wxGraphicsContext | show |
| defined &Wx::GraphicsContext::Create |
| Wx-Demo-0.22 | Wx::DemoModules::wxSearchCtrl | show |
| defined &Wx::SearchCtrl::new ? 1 : 0 |
| X11-XCB-0.18 | _GenerateMyXS | show |
| () = $0 =~ (__PACKAGE__ . '.pm') ? generate() : 1 |
| X11-XRandR-0.01 | X11::XRandR::Types | show |
| declare XID, as PositiveOrZeroInt |
| XML-Lenient-1.0.1 | XML::Lenient | show |
| method within($full, $tag, $n = 1) {
if (!defined $tag or 0 == length($tag)) {
return '';
} else {
my @vtagged;
$self->_stripverbatim(\@vtagged, \$full);
my $left = $self->{tagl} . $tag . '[ ' . $self->{tag... |
| XML-LibXML-PrettyPrint-0.006 | XML::LibXML::PrettyPrint | show |
| TRUE |
| XML-LibXML-QuerySelector-0.005 | XML::LibXML::QuerySelector | show |
| __FILE__ |
| XML-LibXSLT-Easy-0.03 | XML::LibXSLT::Easy | show |
| multi method get_uri ( Uri $uri ) { $uri }
multi method get_uri ( File $file ) { URI::file->new($file) }
multi method get_uri ( Str $str ) {
if ( -f $str ) {
URI::file->new($str);
} else {
URI::data->new($str);
}
}
mu... |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study | show |
| finalize_class() |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study::Facility | show |
| finalize_class() |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study::Contact | show |
| finalize_class() |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study::Intervention | show |
| finalize_class() |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study::Location | show |
| finalize_class() |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study::Link | show |
| finalize_class() |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study::Design | show |
| finalize_class() |
| XML-Parser-ClinicalTrials-Study-1.20150818 | XML::Parser::ClinicalTrials::Study::MeSHTerm | show |
| finalize_class() |
| XML-SAX-Machines-0.46 | XML::SAX::Machines::ConfigDefaults | show |
| $LegalProcessorClassOptions = {
ConstructWithHashedOptions =>
q{Use Foo->new( { Handler => $h } ) instead of Foo->new( Handler => $h )},
},
$ProcessorClassOptions = {
"XML::Filter::SAXT" => {
ConstructWithHashedO... |
| XML-Toolset-0.50 | XML::Toolset::MSXML | show |
| dependencies_available() |
| XML-Validate-1.025 | XML::Validate::MSXML | show |
| dependencies_available() |
| XT-Manager-0.006 | XT::Manager::API | show |
| __FILE__ |
| XTerm-Conf-0.11 | XTerm::Conf | show |
| xterm_conf(@ARGV) |
| XUL-Gui-0.63 | Web::Gui | show |
| __PACKAGE__ if 'first require' |
| XUL-Gui-0.63 | XUL::Gui | show |
| __PACKAGE__ if 'first require' |
| Xacobeo-0.15 | Xacobeo::Ex::ClipboardLoad | show |
| __PACKAGE__->load() |
| YAPC-1.01 | YAPC | show |
| $YAPC::Venue::VERSION = '1.01' |
| Zonemaster-GUI-1.0.11 | Zonemaster::GUI::Dancer::Export | show |
| true |
| Zonemaster-GUI-1.0.11 | Zonemaster::GUI::Dancer::Frontend | show |
| true |
| Zonemaster-GUI-1.0.11 | Zonemaster::GUI::Dancer::NoJsFrontend | show |
| true |
| anarch-0.04 | App::Anarch | show |
| $VERSION = '0.04' |
| constant-lexical-2.0003 | constant::lexical | show |
| eval($] < 5.011002 ? $old : $new) or die $@ |
| cvswebedit-v2.0b1 | CGI::Form | show |
| $VERSION |
| cvswebedit-v2.0b1 | CGI::BasePlus | show |
| $VERSION |
| cyrillic-1.05 | Lingua::DetectCharset::StatWin | show |
| %StatsTableWin = (
'��' => 21815,
'��' => 19276,
'��' => 16528,
'��' => 15172,
'��' => 15161,
'��' => 14457,
'��' => 14151,
'��' => 13562,
'��' => 13327,
'��' => 11067,
'��' => 10935,
'��' => 10268,
'��' =&... |
| cyrillic-1.05 | Lingua::DetectCharset::StatKoi | show |
| %StatsTableKoi = (
'��' => 21815,
'��' => 19276,
'��' => 16528,
'��' => 15172,
'��' => 15161,
'��' => 14457,
'��' => 14151,
'��' => 13562,
'��' => 13327,
'��' => 11067,
'��' => 10935,
'��' => 10268,
'��' =&... |
| cyrillic-1.05 | Lingua::DetectCharset::StatKoi | show |
| %StatsTableKoi = (
'��' => 21815,
'��' => 19276,
'��' => 16528,
'��' => 15172,
'��' => 15161,
'��' => 14457,
'��' => 14151,
'��' => 13562,
'��' => 13327,
'��' => 11067,
'��' => 10935,
'��' => 10268,
'��' =&... |
| cyrillic-1.05 | Lingua::DetectCharset::StatUtf8 | show |
| %StatsTableUtf8Long = (
'ст' => 21815,
'ен' => 19276,
'на' => 16528,
'ов' => 15172,
'го' => 15161,
'но' => 14457,
'ни' => 14151,
'ог' => 13562,
'пр' => 13327,
'ре' => 11067,
'ал' => 10935,
'ан' => 10268,
'р... |
| cyrillic-1.05 | Lingua::DetectCharset::StatKoi8u | show |
| %StatsTableKoi8uLong = (
'��' => 21815,
'��' => 19276,
'��' => 16528,
'��' => 15172,
'��' => 15161,
'��' => 14457,
'ά' => 14151,
'��' => 13562,
'��' => 13327,
'��' => 11067,
'��' => 10935,
'��' => 10268,
'�... |
| examples | HashEmp | show |
| timethese (100000,
{"Employee", '$x = $o->age',
"HashEmp" , '$x = $o1->age'
}
) |
| examples | File | show |
| print $obj->next_line() |
| jmx4perl-1.12 | JMX::Jmx4Perl::Agent::Jolokia::Verifier::PGPKey | show |
| $KEY = <<EOT |
| junk-0.004 | junk | show |
| import |
| libapreq2-2.13 | APR::Request::Param | show |
| push our(@ISA), () |
| methods-0.12 | methods | show |
| method import {
my $want_invoker;
if (@_ and $_[0] eq '-invoker') {
$want_invoker = shift;
}
true->import;
namespace::sweep->import( -cleanee => scalar(caller) );
Method::Signatures::Simple->import( @_, into =&... |
| mod_perl-2.0.10 | APR::Base64 | show |
| $ModPerl::Util::VERSION = 2.000010 |
| new.spirit-2.2.2 | CIPP | show |
| $VERSION = "0.00" |
| pcsc-perl-1.4.14 | Chipcard::PCSC | show |
| _LoadPCSCLibrary() |
| perl5i-v2.13.2 | perl5i::2::ARRAY | show |
| method intersect(@rest) {
unless (@rest) {
return wantarray ? @$self : $self;
}
require List::MoreUtils;
my $has_refs = List::MoreUtils::any(sub { ref $_ }, @$self);
my $intersect_two = $has_refs ? $intersect_two_deeply : $in... |
| perl5i-v2.13.2 | perl5i::2::Signature::Real | show |
| method new($class: %args) {
bless \%args, $class;
}
sub make_real () {}
method __parse_signature {
my $string = $self->{signature}->trim;
if( $string =~ s{^ (\$\w+) : \s*}{}x ) {
$self->{invocant} = $1 // '';
}
... |
| perlconsole-0.4 | PerlConsole | show |
| $VERSION = '0.4' |
| pop-0.07 | POP::Id_factory | show |
| $VERSION=$VERSION |
| pop-0.07 | POP::POX_parser | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::List | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::Pid_factory | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::Environment | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::Lazy_object_hash | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::Lazy_object | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::Lazy_object_list | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::Persistent | show |
| $VERSION = $VERSION |
| pop-0.07 | POP::Lid_factory | show |
| $VERSION=$VERSION |
| pop-0.07 | POP::Hash | show |
| $VERSION = $VERSION |
| qbit_xgettext-0.006 | QBit::Gettext::PO | show |
| TRUE |
| qbit_xgettext-0.006 | QBit::Gettext::Extract | show |
| qbit_xgettext-0.006 | QBit::Gettext::Extract::Lang | show |
| qbit_xgettext-0.006 | QBit::Gettext::Extract::Lang::Perl | show |
| qbit_xgettext-0.006 | QBit::Gettext::Extract::Lang::TT2 | show |
| qdbm-perl-1.8.14 | Curia | show |
| TRUE |
| qdbm-perl-1.8.14 | Villa | show |
| TRUE |
| qdbm-perl-1.8.14 | Depot | show |
| TRUE |
| sympatic-0.2 | Types::Fibo | show |
| declare Seed
=> as ArrayRef
=> where { @$_ == 2 } |