view release on metacpan or search on metacpan
lib/AAC/Pvoice/Panel.pm view on Meta::CPAN
$self->RoundCornerRadius(10);
my ($x, $y);
# to get the right dimensions for the items, we maximize the
# frame, show it, get the dimensions, and hide it again
if (ref($self->{parent}) =~ /Frame/)
{
if ($self->{parent}->IsMaximized)
{
($x, $y) = @{$self->{size}};
lib/AAC/Pvoice/Panel.pm view on Meta::CPAN
$self->{parent}->Show(0);
}
}
else
{
# if our parent isn't a frame, we're not able to maximize
# it, so we just get the dimensions of the parent
($x, $y) = @{$self->{size}};
}
$self->{realx} = $x;
$self->{realy} = $y;
view all matches for this distribution
view release on metacpan or search on metacpan
This ACL system provides a light framework for supplying regex-style, sys-admin
friendly access control to any kind of application.
Any application can make use of the module, the example application is a perl
service that takes postfix style policy server declarations, converts them
into a native format, and checks them against a database of ACLs.
view all matches for this distribution
view release on metacpan or search on metacpan
tiny-AES-c/library.json view on Meta::CPAN
"repository":
{
"type": "git",
"url": "https://github.com/kokke/tiny-AES-c.git"
},
"frameworks": "*",
"platforms": "*",
"examples": "test.c"
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/CBR/Case.pm view on Meta::CPAN
}
=head1 SEE ALSO
See L<AI::CBR> for an overview of the framework.
=head1 AUTHOR
Darko Obradovic, C<< <dobradovic at gmx.de> >>
view all matches for this distribution
view release on metacpan or search on metacpan
eg/easy_guesser.pl view on Meta::CPAN
#!/usr/bin/perl
# This script can be helpful for getting a set of baseline scores for
# a categorization task. It simulates using the "Guesser" learner,
# but is much faster. Because it doesn't leverage using the whole
# framework, though, it expects everything to be in a very strict
# format. <cats-file> is in the same format as the 'category_file'
# parameter to the Collection class. <training-dir> and <test-dir>
# give paths to directories of documents, named as in <cats-file>.
use strict;
view all matches for this distribution
view release on metacpan or search on metacpan
bin/consult view on Meta::CPAN
proc main {} {
wm title . "Simple Inference Engine"
wm geometry . 500x500
# The top frame holds the buttons
frame .top
button .load -text "Load..." -command "do_load" -width 8
button .run -text "Run" -command "do_run" -width 8 -state disabled
button .save -text "Save..." -command "do_save" -width 8 -state disabled
checkbutton .display -text "Display 'information' messages" -variable display_information -onvalue 1 -offvalue 0
pack .load .run .save .display -side left -anchor n -in .top
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/FANN.pm view on Meta::CPAN
Fast Artificial Neural Network Library is a free open source neural
network library, which implements multilayer artificial neural
networks in C with support for both fully connected and sparsely
connected networks. Cross-platform execution in both fixed and
floating point are supported. It includes a framework for easy
handling of training data sets. It is easy to use, versatile, well
documented, and fast. PHP, C++, .NET, Python, Delphi, Octave, Ruby,
Pure Data and Mathematica bindings are available. A reference manual
accompanies the library with examples and recommendations on how to
use the library. A graphical user interface is also available for
view all matches for this distribution
view release on metacpan or search on metacpan
can easily ask DLV for some jobs and then easily exploit its output.
So, how does it work? The user can write down (or compose!) his/her declarative solutions;
AI::Logic::AnswerSet takes care of interacting with DLV and makes results available into Perl,
where they can be easily managed by the user.
NOTE: the use of this framework requires at least some basics of declarative programming, ASP in particular;
in addition, the DLV system is needed.
The user might refer to www.dlvsystem.com for downloading DLV and getting some info on its language.
INSTALLATION
view all matches for this distribution
view release on metacpan or search on metacpan
megahal.trn view on Meta::CPAN
The neck is the part of the body which connects the head with the shoulders.
The nerves are a part of the body which generate and transmit electrical impulses.
The nose is an animal's organ of smell.
The pelvis is a bony girdle in vertebrates that connects the body with the lower extremities.
The rectum is the lowest portion of the large intestine, terminating at the anus.
The skeleton is the hard internal or external framework of bones.
A vein carries venous blood from the body to the heart.
The waist is the part of the body between the ribs and the hips.
#
# Encyclopaedic information: Nature
#
view all matches for this distribution
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
^cpan/
^MYMETA
^.releaserc
^.*.cmd
^AI-Ollama-Client
^frame-\d+.png
^demo/
^\.carmel/
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/PSO.pm view on Meta::CPAN
groups ranging from marching of ants, to flocking of birds, to
swarming of bees.
PSO is a cooperative approach to optimization rather than an
evolutionary approach which kills off unsuccessful members of the
search team. In the swarm framework each particle, is a relatively
unintelligent search agent. It is in the collective sharing of
knowledge that solutions are found. Each particle simply shares its
information with its neighboring particles. So, if one particle is
not doing to well (has a low fitness), then it looks to its neighbors
for help and tries to be more like them while still maintaining a
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/TensorFlow/Libtensorflow/DeviceList.pm view on Meta::CPAN
arg int => 'index',
arg TF_Status => 'status'
] => $methods{$method} );
}
### From tensorflow/core/framework/types.cc
my %DEVICE_TYPES = (
DEFAULT => "DEFAULT",
CPU => "CPU",
GPU => "GPU",
TPU => "TPU",
view all matches for this distribution
view release on metacpan or search on metacpan
samples/termites.pl view on Meta::CPAN
Prefix used for the file names of the generated PNGs. Defaults to
C<output>.
=item --one-of N
Save to file one of every N frames. Defaults to 5.
=item --top N
Exit the application when the number of iterations reachs the given
number.
view all matches for this distribution
view release on metacpan or search on metacpan
DEPENDENCIES
This module requires these other modules and libraries:
DirDB (but another persistence framework would work too.)
COPYRIGHT AND LICENCE
Copyright (C) 2004 David Nicol davidnico@cpan.org
released under GNU public license (GPL)
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AMF/Connection.pm view on Meta::CPAN
The module includes basic support for synchronous HTTP/S based RPC request-response access, where the client sends a request to the server to be processed and the server returns a response to the client containing the processing outcome. Data is sent...
AMF0 and AMF3 support is provided using the Storable::AMF module. While HTTP/S requestes to the AMF endpoint are carried out using the LWP::UserAgent module. The requests are sent using the HTTP POST method as AMF0 encoded data by default. AMF3 encod...
If encoding is set to AMF3 the Flex Messaging framework is used on returned responses content (I.e. objects casted to "flex.messaging.messages.AcknowledgeMessage" and "flex.messaging.messages.ErrorMessage" are returned).
Simple batch requests and responses is provided also.
See the sample usage synopsis above to start using the module.
lib/AMF/Connection.pm view on Meta::CPAN
=head1 SEE ALSO
AMF::Connection::MessageBody
Storable::AMF, Storable::AMF0, LWP::UserAgent
Flex messaging framework / LiveCycle Data Services
http://livedocs.adobe.com/blazeds/1/javadoc/flex/messaging/io/amf/client/package-summary.html
http://livedocs.adobe.com/blazeds/1/javadoc/flex/messaging/io/amf/client/AMFConnection.html
http://www.adobe.com/livedocs/flash/9.0/ActionScriptLangRefV3/flash/net/NetConnection.html
http://help.adobe.com/en_US/LiveCycleDataServicesES/3.1/Developing/lcds31_using.pdf
http://help.adobe.com/en_US/Flex/4.0/AccessingData/flex_4_accessingdata.pdf
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AMF/Perl.pm view on Meta::CPAN
ORIGINAL PHP Remoting CONTRIBUTORS
Musicman - original design
Justin - gateway architecture, class structure, datatype io additions
John Cowen - datatype io additions, class structure
Klaasjan Tukker - modifications, check routines, and register-framework
==head1 CHANGES
=head2 Sun Jul 11 18:45:40 EDT 2004
lib/AMF/Perl.pm view on Meta::CPAN
my %result;
$description = "An error occurred" unless $description;
$result{"description"} = $description;
$result{"exceptionStack"} = $stack->as_string;
my @frames = $stack->frames;
$result{"details"} = $frames[1]->filename();
$result{"line"} = $frames[1]->line();
$result{"level"} = "Error";
$result{"code"} = "1";
return \%result;
}
view all matches for this distribution
view release on metacpan or search on metacpan
examples/githubcl-appspec.yaml view on Meta::CPAN
/repos/{owner}/{repo}/{archive_format}/{path}:
get:
description: |
Get archive link.
This method will return a 302 to a URL to download a tarball or zipball
archive for a repository. Please make sure your HTTP framework is
configured to follow redirects or you will need to use the Location header
to make a second GET request.
Note: For private repositories, these links are temporary and expire quickly.
parameters:
- description: Name of repository owner.
view all matches for this distribution
view release on metacpan or search on metacpan
applications/htmlroot/cgi-bin/getHelpPlugin.pl view on Meta::CPAN
# //-->
# </script>
# <a href="javascript:openHelpPluginFilename('$htmlHelpPluginFilename');" target="_blank">$htmlHelpPluginFilename</a>
#HTML
} else {
print '<iframe src="', $htmlHelpPluginFilename, '" width="100%" height="1214" more="" ATTRIBUTES=""></iframe>', "\n";
}
print '</td></tr></table>', "\n";
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Abilities.pm view on Meta::CPAN
=head1 DESCRIPTION
Abilities is a simple yet powerful mechanism for authorizing users of web
applications (or any applications) to perform certain actions in the application. This is an
extension of the familiar role-based access control that is common in
various systems and frameworks like L<Catalyst> (See L<Catalyst::Plugin::Authorization::Roles>
for the role-based implementation and L<Catalyst::Plugin::Authorization::Abilities>
for the ability-based implementation that inspired this module).
As opposed to role-based access control - where users are allowed access
to a certain feature (here called 'action') only through their association
view all matches for this distribution
view release on metacpan or search on metacpan
Ace/Sequence.pm view on Meta::CPAN
],@_);
# Object must have a parent sequence and/or a reference
# sequence. In some cases, the parent sequence will be the
# object itself. The reference sequence is used to set up
# the frame of reference for the coordinate system.
# fetch the sequence object if we don't have it already
croak "Please provide either a Sequence object or a database and name"
unless ref($seq) || ($seq && $db);
view all matches for this distribution
view release on metacpan or search on metacpan
fortune/jackbauer view on Meta::CPAN
%
Jack won with rock even when paper covered him. No one can cover Jack Bauer.
%
Jack Bauer gets five downs.
%
After being framed for David Palmer's murder Jack cleared his own name and found the real killer not in the name of justice, but because he is too much of a man to accept charity on his body count.
%
If you send someone to kill Jack Bauer, the only thing you accomplish is supplying him a fresh set of weapons to kill you with.
%
Someone once asked Jack Bauer if he had a case of the Mondays. What ensued was one of the most heinous beatings in recorded history.
%
fortune/jackbauer view on Meta::CPAN
%
Moses parted the Red Sea. The Red Sea would part for Jack.
%
Jack Bauer can break anyone and anything, but he will always break the protocol first.
%
Jack Bauer framed Roger Rabbit.
%
Jack Bauer doesn't need money, "I give you my word," is enough.
%
When Jack Bauer makes love, he does it with a knife to your throat.
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Spiffy.pm view on Meta::CPAN
our @EXPORT = ();
our @EXPORT_BASE = qw(field const stub super);
our @EXPORT_OK = (@EXPORT_BASE, qw(id WWW XXX YYY ZZZ));
our %EXPORT_TAGS = (XXX => [qw(WWW XXX YYY ZZZ)]);
my $stack_frame = 0;
my $dump = 'yaml';
my $bases_map = {};
sub WWW; sub XXX; sub YYY; sub ZZZ;
inc/Spiffy.pm view on Meta::CPAN
unless grep /^XXX$/, @EXPORT_BASE;
}
spiffy_filter()
if ($args->{-selfless} or $args->{-Base}) and
not $filtered_files->{(caller($stack_frame))[1]}++;
my $caller_package = $args->{-package} || caller($stack_frame);
push @{"$caller_package\::ISA"}, $self_package
if $args->{-Base} or $args->{-base};
for my $class (@{all_my_bases($self_package)}) {
next unless $class->isa('Spiffy');
inc/Spiffy.pm view on Meta::CPAN
}
package Spiffy;
sub super {
my $method;
my $frame = 1;
while ($method = (caller($frame++))[3]) {
$method =~ s/.*::// and last;
}
my @args = DB::super_args($frame);
@_ = @_ ? ($args[0], @_) : @args;
my $class = ref $_[0] ? ref $_[0] : $_[0];
my $caller_class = caller;
my $seen = 0;
my @super_classes = reverse grep {
inc/Spiffy.pm view on Meta::CPAN
for my $base_class (@base_classes) {
next if $inheritor->isa($base_class);
croak "Can't mix Spiffy and non-Spiffy classes in 'use base'.\n",
"See the documentation of Spiffy.pm for details\n "
unless $base_class->isa('Spiffy');
$stack_frame = 1; # tell import to use different caller
import($base_class, '-base');
$stack_frame = 0;
}
}
sub mixin {
my $self = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Spiffy.pm view on Meta::CPAN
our @EXPORT = ();
our @EXPORT_BASE = qw(field const stub super);
our @EXPORT_OK = (@EXPORT_BASE, qw(id WWW XXX YYY ZZZ));
our %EXPORT_TAGS = (XXX => [qw(WWW XXX YYY ZZZ)]);
my $stack_frame = 0;
my $dump = 'yaml';
my $bases_map = {};
sub WWW; sub XXX; sub YYY; sub ZZZ;
inc/Spiffy.pm view on Meta::CPAN
unless grep /^XXX$/, @EXPORT_BASE;
}
spiffy_filter()
if ($args->{-selfless} or $args->{-Base}) and
not $filtered_files->{(caller($stack_frame))[1]}++;
my $caller_package = $args->{-package} || caller($stack_frame);
push @{"$caller_package\::ISA"}, $self_package
if $args->{-Base} or $args->{-base};
for my $class (@{all_my_bases($self_package)}) {
next unless $class->isa('Spiffy');
inc/Spiffy.pm view on Meta::CPAN
}
package Spiffy;
sub super {
my $method;
my $frame = 1;
while ($method = (caller($frame++))[3]) {
$method =~ s/.*::// and last;
}
my @args = DB::super_args($frame);
@_ = @_ ? ($args[0], @_) : @args;
my $class = ref $_[0] ? ref $_[0] : $_[0];
my $caller_class = caller;
my $seen = 0;
my @super_classes = reverse grep {
inc/Spiffy.pm view on Meta::CPAN
for my $base_class (@base_classes) {
next if $inheritor->isa($base_class);
croak "Can't mix Spiffy and non-Spiffy classes in 'use base'.\n",
"See the documentation of Spiffy.pm for details\n "
unless $base_class->isa('Spiffy');
$stack_frame = 1; # tell import to use different caller
import($base_class, '-base');
$stack_frame = 0;
}
}
sub mixin {
my $self = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Spiffy.pm view on Meta::CPAN
our @EXPORT = ();
our @EXPORT_BASE = qw(field const stub super);
our @EXPORT_OK = (@EXPORT_BASE, qw(id WWW XXX YYY ZZZ));
our %EXPORT_TAGS = (XXX => [qw(WWW XXX YYY ZZZ)]);
my $stack_frame = 0;
my $dump = 'yaml';
my $bases_map = {};
sub WWW; sub XXX; sub YYY; sub ZZZ;
inc/Spiffy.pm view on Meta::CPAN
unless grep /^XXX$/, @EXPORT_BASE;
}
spiffy_filter()
if ($args->{-selfless} or $args->{-Base}) and
not $filtered_files->{(caller($stack_frame))[1]}++;
my $caller_package = $args->{-package} || caller($stack_frame);
push @{"$caller_package\::ISA"}, $self_package
if $args->{-Base} or $args->{-base};
for my $class (@{all_my_bases($self_package)}) {
next unless $class->isa('Spiffy');
inc/Spiffy.pm view on Meta::CPAN
}
package Spiffy;
sub super {
my $method;
my $frame = 1;
while ($method = (caller($frame++))[3]) {
$method =~ s/.*::// and last;
}
my @args = DB::super_args($frame);
@_ = @_ ? ($args[0], @_) : @args;
my $class = ref $_[0] ? ref $_[0] : $_[0];
my $caller_class = caller;
my $seen = 0;
my @super_classes = reverse grep {
inc/Spiffy.pm view on Meta::CPAN
for my $base_class (@base_classes) {
next if $inheritor->isa($base_class);
croak "Can't mix Spiffy and non-Spiffy classes in 'use base'.\n",
"See the documentation of Spiffy.pm for details\n "
unless $base_class->isa('Spiffy');
$stack_frame = 1; # tell import to use different caller
import($base_class, '-base');
$stack_frame = 0;
}
}
sub mixin {
my $self = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/SHARYANTO/LoggingFrameworks.pm view on Meta::CPAN
package Acme::CPANLists::Import::SHARYANTO::LoggingFrameworks;
our $DATE = '2016-02-21'; # DATE
our $VERSION = '0.01'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in the article [http://blogs.perl.org/users/steven_haryanto/2010/11/short-grossly-incomplete-comparison-of-perl-logging-frameworks.html] (retrieved on 201...
1;
# ABSTRACT: (Short, grossly incomplete) comparison of Perl logging frameworks (2010)
__END__
=pod
=encoding UTF-8
=head1 NAME
Acme::CPANLists::Import::SHARYANTO::LoggingFrameworks - (Short, grossly incomplete) comparison of Perl logging frameworks (2010)
=head1 VERSION
This document describes version 0.01 of Acme::CPANLists::Import::SHARYANTO::LoggingFrameworks (from Perl distribution Acme-CPANLists-Import-SHARYANTO), released on 2016-02-21.
=head1 DESCRIPTION
This module is generated by extracting module names mentioned in the article L<http://blogs.perl.org/users/steven_haryanto/2010/11/short-grossly-incomplete-comparison-of-perl-logging-frameworks.html> (retrieved on 2016-02-21). For the full article, v...
=over
=item * [2016-02-21] Since this article was written, I have also published: L<Log::Any::App>, and plan to release L<Log::Gurat>.
=back
=head1 MODULE LISTS
=head2 (Short, grossly incomplete) comparison of Perl logging frameworks (2010)
This list is generated by extracting module names mentioned in the article [http://blogs.perl.org/users/steven_haryanto/2010/11/short-grossly-incomplete-comparison-of-perl-logging-frameworks.html] (retrieved on 2016-02-21). For the full article, visi...
=over
=item * L<Log::Any>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANLists/PERLANCAR/NonMooseStyleClassBuilder.pm view on Meta::CPAN
See also a whole host of Class::Accessor::* modules.
_
entries => [
{module => 'Class::Meta::AccessorBuilder',
summary=>'Part of the Class::Meta framework'},
{module => 'Class::Struct'},
{module => 'Class::Builder'},
{module => 'Class::GenSource',
summary=>'This is more like code generator, it generates Perl code source for the entire class definition, not just accessors'},
{module => 'Object::Declare'},
lib/Acme/CPANLists/PERLANCAR/NonMooseStyleClassBuilder.pm view on Meta::CPAN
See also a whole host of Class::Accessor::* modules.
=over
=item * L<Class::Meta::AccessorBuilder> - Part of the Class::Meta framework
=item * L<Class::Struct>
=item * L<Class::Builder>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANModules/BrowsingTableInteractively.pm view on Meta::CPAN
It has plugins, and I guess it should be simple enough to create a plugin so you
can filter rows or add columns using Perl expression instead of the default
Python, if needed.
My CLI framework <pm:Perinci::CmdLine> (<pm:Perinci::CmdLine::Lite>, v1.918+)
has support for Visidata. You can specify command-line option `--format=vd` to
browse the output of your CLI program in Visidata.
2) **DataTables**, <https://datatables.net>
lib/Acme/CPANModules/BrowsingTableInteractively.pm view on Meta::CPAN
on. It also has plugins to do more customized stuffs. I still prefer Visidata
most of the time because I am comfortable living in the terminal, but I
particularly love the incremental searching feature that comes built-in with
DataTables.
My CLI framework <pm:Perinci::CmdLine> (<pm:Perinci::CmdLine::Lite>, v1.918+)
also has support for DataTables. You can specify command-line option
`--format=html+datatables` to output your CLI program's result as HTML table
(using <pm:Text::Table::HTML::DataTables>) when possible and then browse the
output in browser.
lib/Acme/CPANModules/BrowsingTableInteractively.pm view on Meta::CPAN
It has plugins, and I guess it should be simple enough to create a plugin so you
can filter rows or add columns using Perl expression instead of the default
Python, if needed.
My CLI framework L<Perinci::CmdLine> (L<Perinci::CmdLine::Lite>, v1.918+)
has support for Visidata. You can specify command-line option C<--format=vd> to
browse the output of your CLI program in Visidata.
2) B<DataTables>, L<https://datatables.net>
lib/Acme/CPANModules/BrowsingTableInteractively.pm view on Meta::CPAN
on. It also has plugins to do more customized stuffs. I still prefer Visidata
most of the time because I am comfortable living in the terminal, but I
particularly love the incremental searching feature that comes built-in with
DataTables.
My CLI framework L<Perinci::CmdLine> (L<Perinci::CmdLine::Lite>, v1.918+)
also has support for DataTables. You can specify command-line option
C<--format=html+datatables> to output your CLI program's result as HTML table
(using L<Text::Table::HTML::DataTables>) when possible and then browse the
output in browser.
view all matches for this distribution