view release on metacpan or search on metacpan
lib/AAC/Pvoice.pm view on Meta::CPAN
-1,
$message,
wxDefaultPosition,
wxDefaultSize,
wxALIGN_CENTRE);
$messagectrl->SetBackgroundColour($d->{backgroundcolour});
$messagectrl->SetFont(Wx::Font->new(10, # font size
wxDECORATIVE, # font family
wxNORMAL, # style
wxNORMAL, # weight
0,
lib/AAC/Pvoice.pm view on Meta::CPAN
wxDefaultPosition, # pos
wxDefaultSize,
$width,
25,
$d->{ITEMSPACING},
$d->{backgroundcolour}),
0); #selectable
return $d->ShowModal();
}
=pod
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AC/Daemon.pm view on Meta::CPAN
sub daemonize {
my $tout = shift;
my $name = shift;
my $argv = shift;
fork && exit; # background ourself
$verbose = 0;
my @argv = $argv ? @$argv : @maybe_argv;
close STDIN; open( STDIN, "/dev/null" );
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AC/MrGamoo/API/Get.pm view on Meta::CPAN
my $proto = shift;
my $req = shift;
my $content = shift;
return unless $proto->{want_reply};
in_background( \&_get_file, $io, $proto, $req, $content );
}
sub _get_file {
my $io = shift;
my $proto = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
t/data/python_quotes.txt view on Meta::CPAN
language, and I've never regretted it.)
-- Guido van Rossum, 25 Nov 1998
"My course members are almost all coming from Math, and the first question
was 'why isn't it complete?' Just a matter of elegance."
"Oh, don't worry. My background is math. This is actually good for them --
like discovering that Santa Claus doesn't really exist."
-- Christian Tismer and Guido van Rossum, 2 Dec 1998
One of my cheap entertainments is axiomatizing characterizations of [Tim
Peters]. I think I've come up with a minimal one: the only c.l.p poster more
view all matches for this distribution
view release on metacpan or search on metacpan
<HEAD>
<TITLE>AI::NeuralNet::BackProp - A simple back-prop neural net that uses Delta's and Hebbs' rule.</TITLE>
<LINK REV="made" HREF="mailto:">
<STYLE>
BODY { font-family:Verdana; font-size:11; color:black; }
CODE { background: rgb(200,200,200); }
PRE { background:rgb(220,220,220); padding: 5; border:1px black solid; }
A:link {font-family:Verdana, Arial, Helvetica, Helv; font-size:10px; text-decoration:underline; font-weight:normal; color:rgb(58,73,114);}
A:visited {font-family:Verdana, Arial, Helvetica, Helv; font-size:10px; text-decoration:normal; font-weight:normal; color:rgb(58,73,114);}
A:hover {font-family:Verdana, Arial, Helvetica, Helv; font-size:10px; text-decoration:underline; font-weight:normal; color:rgb(200,50,0);}
</STYLE>
</HEAD>
view all matches for this distribution
view release on metacpan or search on metacpan
<HEAD>
<TITLE>AI::NeuralNet::Mesh - An optimized, accurate neural network Mesh.</TITLE>
<LINK REV="made" HREF="mailto:">
<STYLE>
BODY { font-family:Verdana; font-size:11; color:black; }
CODE { background: rgb(200,200,200); }
PRE { background:rgb(220,220,220); padding: 5; border:1px black solid; }
A:link {font-family:Verdana, Arial, Helvetica, Helv; font-size:10px; text-decoration:underline; font-weight:normal; color:rgb(58,73,114);}
A:visited {font-family:Verdana, Arial, Helvetica, Helv; font-size:10px; text-decoration:normal; font-weight:normal; color:rgb(58,73,114);}
A:hover {font-family:Verdana, Arial, Helvetica, Helv; font-size:10px; text-decoration:underline; font-weight:normal; color:rgb(200,50,0);}
</STYLE>
</HEAD>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/NeuralNet/Simple.pm view on Meta::CPAN
felt and we start eyeing our neighbor's popcorn in the movie theater, wondering
if they'll notice if we snatch some while they're watching the movie.
=head2 A simple example of a neuron
Now that you have a solid biology background (uh, no), how does this work when
we're trying to simulate a neural network? The simplest part of the network is
the neuron (also known as a node or, sometimes, a neurode). A we might think
of a neuron as follows (OK, so I won't make a living as an ASCII artist):
Input neurons Synapses Neuron Output
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/SimulatedAnnealing.htm view on Meta::CPAN
<title>AI::SimulatedAnnealing – optimize a list of numbers
according to a specified cost function.</title>
<meta http-equiv="content-type" content="text/html; charset=utf-8"/>
<link href="mailto:" rev="made"/>
</head>
<body style="background-color: white">
<ul>
<li><a href="#name">NAME</a></li>
<li><a href="#synopsis">SYNOPSIS</a></li>
<li><a href="#description">DESCRIPTION</a></li>
<li><a href="#prerequisites">PREREQUISITES</a></li>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
#by Alvesgaspar, CC BY-SA 3.0 <https://creativecommons.org/licenses/by-sa/3.0>, via Wikimedia Commons
"dog" => "https://upload.wikimedia.org/wikipedia/commons/archive/a/a9/20090914031557%21Saluki_dog_breed.jpg",
#by Craig Pemberton, CC BY-SA 3.0 <https://creativecommons.org/licenses/by-sa/3.0>, via Wikimedia Commons
"apple" => "https://upload.wikimedia.org/wikipedia/commons/1/15/Red_Apple.jpg",
#by Abhijit Tembhekar from Mumbai, India, CC BY 2.0 <https://creativecommons.org/licenses/by/2.0>, via Wikimedia Commons
"banana" => "https://upload.wikimedia.org/wikipedia/commons/1/1c/Bananas_white_background.jpg",
#by fir0002 flagstaffotos [at] gmail.com Canon 20D + Tamron 28-75mm f/2.8, GFDL 1.2 <http://www.gnu.org/licenses/old-licenses/fdl-1.2.html>, via Wikimedia Commons
"turtle" => "https://upload.wikimedia.org/wikipedia/commons/8/80/Turtle_golfina_escobilla_oaxaca_mexico_claudio_giovenzana_2010.jpg",
#by Claudio Giovenzana, CC BY-SA 3.0 <https://creativecommons.org/licenses/by-sa/3.0>, via Wikimedia Commons
"flamingo" => "https://upload.wikimedia.org/wikipedia/commons/b/b8/James_Flamingos_MC.jpg",
#by Christian Mehlführer, User:Chmehl, CC BY 3.0 <https://creativecommons.org/licenses/by/3.0>, via Wikimedia Commons
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
my $top_batched = $probabilities_batched->qsorti->slice([-1, -$N]);
my @top_lists = dog($top_batched);
my $includes_background_class = $probabilities_batched->dim(0) == IMAGENET_LABEL_COUNT_WITH_BG;
if( IN_IPERL ) {
my $html = IPerl->html(
my_table( [0..$#image_names], sub {
my ($batch_idx, $h) = @_;
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
),
do {
my @tr;
push @tr, [ $h->th('Rank', 'Label No', 'Label', 'Prob') ];
while( my ($i, $label_index) = each @top_for_image ) {
my $class_index = $includes_background_class ? $label_index : $label_index + 1;
push @tr, [ $h->td(
$i + 1,
$class_index,
$labels[$class_index],
$probabilities_batched->at($label_index,$batch_idx),
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
my @td;
say "Image name: `$image_name`";
my $header = [ ('Rank', 'Label No', 'Label', 'Prob') ];
my @rows;
while( my ($i, $label_index) = each @top_for_image ) {
my $class_index = $includes_background_class ? $label_index : $label_index + 1;
push @rows, [ (
$i + 1,
$class_index,
$labels[$class_index],
$probabilities_batched->at($label_index,$batch_idx),
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
B<STREAM (STDOUT)>:
Downloading https://tfhub.dev/google/imagenet/mobilenet_v2_100_224/classification/5?tf-hub-format=compressed to google_imagenet_mobilenet_v2_100_224_classification_5.tar.gz
Downloading https://storage.googleapis.com/download.tensorflow.org/data/ImageNetLabels.txt to ImageNetLabels.txt
Saved model is in google_imagenet_mobilenet_v2_100_224_classification_5/saved_model.pb
Got labels: background, tench, goldfish, great white shark, tiger shark, etc.
B<RESULT>:
1
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
#by Alvesgaspar, CC BY-SA 3.0 <https://creativecommons.org/licenses/by-sa/3.0>, via Wikimedia Commons
"dog" => "https://upload.wikimedia.org/wikipedia/commons/archive/a/a9/20090914031557%21Saluki_dog_breed.jpg",
#by Craig Pemberton, CC BY-SA 3.0 <https://creativecommons.org/licenses/by-sa/3.0>, via Wikimedia Commons
"apple" => "https://upload.wikimedia.org/wikipedia/commons/1/15/Red_Apple.jpg",
#by Abhijit Tembhekar from Mumbai, India, CC BY 2.0 <https://creativecommons.org/licenses/by/2.0>, via Wikimedia Commons
"banana" => "https://upload.wikimedia.org/wikipedia/commons/1/1c/Bananas_white_background.jpg",
#by fir0002 flagstaffotos [at] gmail.com Canon 20D + Tamron 28-75mm f/2.8, GFDL 1.2 <http://www.gnu.org/licenses/old-licenses/fdl-1.2.html>, via Wikimedia Commons
"turtle" => "https://upload.wikimedia.org/wikipedia/commons/8/80/Turtle_golfina_escobilla_oaxaca_mexico_claudio_giovenzana_2010.jpg",
#by Claudio Giovenzana, CC BY-SA 3.0 <https://creativecommons.org/licenses/by-sa/3.0>, via Wikimedia Commons
"flamingo" => "https://upload.wikimedia.org/wikipedia/commons/b/b8/James_Flamingos_MC.jpg",
#by Christian Mehlführer, User:Chmehl, CC BY 3.0 <https://creativecommons.org/licenses/by/3.0>, via Wikimedia Commons
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
);
}
B<DISPLAY>:
=for html <span style="display:inline-block;margin-left:1em;"><p><table style="width: 100%"><tr><td><tt>apple</tt></td><td><a href="https://upload.wikimedia.org/wikipedia/commons/1/15/Red_Apple.jpg"><img alt="apple" src="https://upload.wikimedia.org/...
=head2 Download the test images and transform them into suitable input data
We now fetch these images and prepare them to be the in the needed format by using C<Imager> to resize and add padding. Then we turn the C<Imager> data into a C<PDL> ndarray. Since the C<Imager> data is stored as 32-bits with 4 channels in the order ...
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
B<STREAM (STDOUT)>:
Downloaded https://upload.wikimedia.org/wikipedia/commons/1/15/Red_Apple.jpg
Rescaled image from [ 2418 x 2192 ] to [ 224 x 203 ]
Padded to [ 224 x 224 ]
Downloaded https://upload.wikimedia.org/wikipedia/commons/1/1c/Bananas_white_background.jpg
Rescaled image from [ 1600 x 1067 ] to [ 224 x 149 ]
Padded to [ 224 x 224 ]
Downloaded https://upload.wikimedia.org/wikipedia/commons/6/63/LT_471_%28LTZ_1471%29_Arriva_London_New_Routemaster_%2819522859218%29.jpg
Rescaled image from [ 3840 x 2560 ] to [ 224 x 149 ]
Padded to [ 224 x 224 ]
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
my $top_batched = $probabilities_batched->qsorti->slice([-1, -$N]);
my @top_lists = dog($top_batched);
my $includes_background_class = $probabilities_batched->dim(0) == IMAGENET_LABEL_COUNT_WITH_BG;
if( IN_IPERL ) {
my $html = IPerl->html(
my_table( [0..$#image_names], sub {
my ($batch_idx, $h) = @_;
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
),
do {
my @tr;
push @tr, [ $h->th('Rank', 'Label No', 'Label', 'Prob') ];
while( my ($i, $label_index) = each @top_for_image ) {
my $class_index = $includes_background_class ? $label_index : $label_index + 1;
push @tr, [ $h->td(
$i + 1,
$class_index,
$labels[$class_index],
$probabilities_batched->at($label_index,$batch_idx),
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
my @td;
say "Image name: `$image_name`";
my $header = [ ('Rank', 'Label No', 'Label', 'Prob') ];
my @rows;
while( my ($i, $label_index) = each @top_for_image ) {
my $class_index = $includes_background_class ? $label_index : $label_index + 1;
push @rows, [ (
$i + 1,
$class_index,
$labels[$class_index],
$probabilities_batched->at($label_index,$batch_idx),
lib/AI/TensorFlow/Libtensorflow/Manual/Notebook/InferenceUsingTFHubMobileNetV2Model.pod view on Meta::CPAN
}
}
B<DISPLAY>:
=for html <span style="display:inline-block;margin-left:1em;"><p><table style="width: 100%"><tr><td><tt>apple</tt></td><td><a href="https://upload.wikimedia.org/wikipedia/commons/1/15/Red_Apple.jpg"><img alt="apple" src="https://upload.wikimedia.org/...
my $p_approx_batched = $probabilities_batched->sumover->approx(1, 1e-5);
p $p_approx_batched;
say "All probabilities sum up to approximately 1" if $p_approx_batched->all->sclr;
view all matches for this distribution
view release on metacpan or search on metacpan
doc/code.html view on Meta::CPAN
font-weight: bold;
color: #990000;
}
div.notes {
background: #dddddd;
font-family: Verdana, Arial, helvetica, sans-serif;
font-size: 12px;
margin-left: 10px;
margin-right: 10px;
padding: 5px;
border-color: #000000;
}
div.tableSub {
background: #CCCCFF;
font-family: Verdana, Arial, helvetica, sans-serif;
font-size: 13px;
color: #003366;
margin-left: 0px;
margin-right: 0px;
doc/code.html view on Meta::CPAN
}
A:link { color: #3366AA; text-decoration: none; }
A:visited { color: #3366CC; text-decoration: none; }
A:active { color: #00CC99; text-decoration: none; }
A:hover { color: #FFFFFF; text-decoration: none; background-color: #6699CC; }
A.noDec:link { color: #000099; font-weight: bold; text-decoration: none; }
A.noDec:visited { color: #000099; font-weight: bold; text-decoration: none; }
A.noDec:active { color: #000099; font-weight: bold; text-decoration: none; }
A.noDec:hover { color: #3366AA; font-weight: bold; text-decoration: underline; background-color: transparent; }
A.plain:link { color: #000033; text-decoration: none; }
A.plain:visited { color: #000033; text-decoration: none; }
A.plain:active { color: #000033; text-decoration: none; }
A.plain:hover { color: #3366AA; text-decoration: none; background-color: transparent; }
h2 {
color: #333333;
font-size: 20 px;
font-weight: bold;
doc/code.html view on Meta::CPAN
}
</style>
</head>
<body
style="background-image: url(orn5.gif);">
<div style="position: absolute; left: 20px;">
<h1>AMF::Perl - Flash Remoting in Perl and Python<br>
</h1>
<table cellpadding="2" cellspacing="2" border="0"
style="text-align: left; width: 600px;">
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ANSI/Palette.pm view on Meta::CPAN
underline_16 => [qw/all underline ansi_16/],
underline_256 => [qw/all underline ansi_256/],
italic_8 => [qw/all italic ansi_8/],
italic_16 => [qw/all italic ansi_16/],
italic_256 => [qw/all italic ansi_256/],
background_text_8 => [qw/all background_text ansi_8/],
background_text_16 => [qw/all background_text ansi_16/],
background_text_256 => [qw/all background_text ansi_256/],
background_bold_8 => [qw/all background_bold ansi_8/],
background_bold_16 => [qw/all background_bold ansi_16/],
background_bold_256 => [qw/all background_bold ansi_256/],
background_underline_8 => [qw/all background_underline ansi_8/],
background_underline_16 => [qw/all background_underline ansi_16/],
background_underline_256 => [qw/all background_underline ansi_256/],
background_italic_8 => [qw/all background_italic ansi_8/],
background_italic_16 => [qw/all background_italic ansi_16/],
background_italic_256 => [qw/all background_italic ansi_256/],
);
sub palette_8 {
print "ANSI palette -> \\e[Nm\n";
lib/ANSI/Palette.pm view on Meta::CPAN
sub italic_256 {
print "\e[38;5;" . $_[0] . ";3m" . $_[1];
reset();
}
sub background_text_8 {
print "\e[" . $_[0] . ";" . $_[1] . "m" . $_[2];
reset();
}
sub background_text_16 {
print "\e[" . $_[0] . ($_[1] ? ";1" : ";0") . ";" . $_[2] . "m" . $_[3];
reset();
}
sub background_text_256 {
print "\e[48;5;" . $_[0] . ";38;5;" . $_[1] . "m" . $_[2];
reset();
}
sub background_bold_8 {
print "\e[" . $_[0] . ";" . $_[1] . ";1m" . $_[2];
reset();
}
sub background_bold_16 {
print "\e[" . $_[0] . ($_[1] ? ";1" : ";0") . ";" . $_[2] . ";1m" . $_[3];
reset();
}
sub background_bold_256 {
print "\e[48;5;" . $_[0] . ";38;5;" . $_[1] . ";1m" . $_[2];
reset();
}
sub background_underline_8 {
print "\e[" . $_[0] . ";" . $_[1] . ";4m" . $_[2];
reset();
}
sub background_underline_16 {
print "\e[" . $_[0] . ($_[1] ? ";1" : ";0") . ';' . $_[2] . ";4m" . $_[3];
reset();
}
sub background_underline_256 {
print "\e[48;5;" . $_[0] . ";38;5;" . $_[1] . ";4m" . $_[2];
reset();
}
sub background_italic_8 {
print "\e[" . $_[0] . ";" . $_[1] . ";3m" . $_[2];
reset();
}
sub background_italic_16 {
print "\e[" . $_[0] . ($_[1] ? ";1" : ";0") . ";" . $_[2] . ";3m" . $_[3];
reset();
}
sub background_italic_256 {
print "\e[48;5;" . $_[0] . ";38;5;" . $_[1] . ";3m" . $_[2];
reset();
}
sub reset { print "\e[0m"; }
lib/ANSI/Palette.pm view on Meta::CPAN
...
use ANSI::Palette qw/ansi_256/;
background_text_256(208, 33, "This is a test for background_text_256\n");
background_bold_256(160, 33, "This is a test for background_bold_256\n");
background_underline_256(226, 33, "This is a test for background_underline_256\n");
background_italic_256(118, 33, "This is a test for background_italic_256\n");
=head1 EXPORT
A list of functions that can be exported. You can delete this section
if you don't export anything, such as for a purely object-oriented module.
lib/ANSI/Palette.pm view on Meta::CPAN
italic_256(32, "This is a test for italic_256\n");
=cut
=head2 background_text_8
print text using one of the 8 base colors on a background using one of the 8 base colors.
background_text_8(32, 40, "This is a test for background_text_8\n");
=cut
=head2 background_text_16
print text using one of the 16 base colors on a background using one of the 16 base colors (40-47) (100-107).
background_text_16(32, 1, 41, "This is a test for background_text_16\n");
=cut
=head2 background_text_256
print text using one of the 256 base colors on a background using one of the 256 base colors.
background_text_256(208, 33, "This is a test for background_text_256\n");
=cut
=head2 background_bold_8
print bold text using one of the 8 base colors on a background using one of the 8 base colors.
background_bold_8(32, 40, "This is a test for background_bold_8\n");
=cut
=head2 background_bold_16
print bold text using one of the 16 base colors on a background using one of the 16 base colors (40-47) (100-107).
background_bold_16(32, 1, 40, "This is a test for background_bold_16\n");
=cut
=head2 background_bold_256
print bold text using one of the 256 base colors on a background using one of the 256 base colors.
background_bold_256(208, 33, "this is a test for background_bold_256\n");
=cut
=head2 background_underline_8
print underlined text using one of the 8 base colors on a background using one of the 8 base colors.
background_underline_8(32, 40, "This is a test for background_underline_8\n");
=cut
=head2 background_underline_16
print underlined text using one of the 16 base colors using one of the 16 base colors (40-47) (100-107).
background_underline_16(32, 1, 40, "This is a test for background_underline_16\n");
=cut
=head2 background_underline_256
print underlined text using one of the 256 base colors on a background using one of the 256 base colors.
background_underline_256(208, 33, "This is a test for background_underline_256\n");
=cut
=head2 background_italic_8
print italic text using one of the 8 base colors on a background using one of the 8 base colors.
background_italic_8(32, 40, "This is a test for background_italic_8\n");
=cut
=head2 italic_16
print italic text using one of the 16 base colors on a background using one of the 16 base colors (40-47) (100-107).
background_italic_16(32, 1, 40, "This is a test for background_italic_16\n");
=cut
=head2 italic_256
print italic text using one of the 256 base colors on a background using on the 256 base colors.
background_italic_256(32, "This is a test for background_italic_256\n");
=cut
=head1 AUTHOR
view all matches for this distribution
view release on metacpan or search on metacpan
lib/API/MikroTik.pm view on Meta::CPAN
Mojo::IOLoop->timer(10 => sub { $api->cancel($tag) });
# or with callback
$api->cancel($tag => sub {...});
Cancels background commands. Can accept a callback as last argument.
=head2 cmd
my $list = $api->cmd('/interface/print');
view all matches for this distribution
view release on metacpan or search on metacpan
lib/arcxd.pod view on Meta::CPAN
=item arcxd
Start the ARCv2 server. The server will listen on the DefaultPort and all local addresses.
It will read the configuration file, located in the ConfigPath. After successful listening,
it will fork into the background.
=item arcxd -p 1234
Same as L<arcxd> but listens on port 1234.
lib/arcxd.pod view on Meta::CPAN
=head1 USAGE
Some parameters can be supplied to this scripts. The most of them come from the configuration file.
By default arcxd fork itself into background. If you want to run arcx in the foreground set the -d option.
The scheme looks like this:
arcxd [-d <loglevel>] [-p <port>] [-F <config file>] [-v]
lib/arcxd.pod view on Meta::CPAN
=over 4
=item -d <loglevel>
Let the server put its log output to "stderr" and set the log level to <loglevel>. Also tells the server to do not fork into the background.
=item -p <port>
On which port the server shall listen on. (override the one from the configuration file and the default port). Change this for testing purposes.
view all matches for this distribution
view release on metacpan or search on metacpan
html/Simple.html view on Meta::CPAN
<title></title>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<link rev="made" href="mailto:" />
</head>
<body style="background-color: white">
<ul id="index">
<li><a href="#NAME">NAME</a></li>
view all matches for this distribution
view release on metacpan or search on metacpan
html/index.html view on Meta::CPAN
<title>ARSperl: BMC Remedy v2-v7 / Perl5 Integration Kit</title>
</head>
<body style="background-color: rgb(255, 255, 255);">
<img alt="ARSPerl" src="arsperl-logo.gif">
<h2> Overview </h2>
<b>ARSperl</b> is an integration kit for <a href="http://www.perl.com/perl">Perl5</a> and <a href="http://www.remedy.com">Remedy ARS</a> version 5
view all matches for this distribution
view release on metacpan or search on metacpan
applications/collector-test.pl view on Meta::CPAN
my $width = 893;
my $hight = 558;
my $xOffset = 74;
my $yOffset = 28;
my $yMarkColor = 0xFFFFDC;
my $background = 0xF7F7F7;
print "Generating RRD alike graph\n" if ($debug eq 'T');
my (@dataOK, @dataCritical, @dataWarning, @dataUnknown, @dataNoTest, @dataOffline, @RRDlabels);
my ($step, $lastTimeslot, $firstTimeslot, $duration, $startTime, $status, $timeslot, $findString);
applications/collector-test.pl view on Meta::CPAN
} else {
$title .= " - DBI_connect - Cannot connect to the database - alarm: $alarm - alarmMessage: $alarmMessage";
$logger->info(" DBI_connect - Cannot connect to the database - alarm: $alarm - alarmMessage: $alarmMessage") if ( defined $logger and $logger->is_info() );
}
# Create a XYChart object of size $width x $hight pixels, using 0xf0e090 as background color, with a black border, and 0 pixel 3D border effect
my $c = new XYChart($width, $hight, $background, 0x0, 0);
# Set the plotarea at (xOffset, yOffset) and of size $width - 95 x $hight - 78 pixels, with white background. Set border and grid line colors.
$c->setPlotArea($xOffset, $yOffset, $width - 95, $hight - 78, 0xffffff, -1, 0xa08040, $c->dashLineColor(0x0, 0x0101), $c->dashLineColor(0x0, 0x0101))->setGridWidth(1);
# Add a title box to the chart using 10 pts Arial Bold Italic font. The text is white (0x000000)
$c->addText($width/2, 14, "$title", "arialbi.ttf", 10, 0x000000, 5, 0);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ASP4/ErrorHandler.pm view on Meta::CPAN
<html>
<head><title>500 Server Error</title>
<meta charset="utf-8" />
<style type="text/css">
HTML,BODY {
background-color: #FFFFFF;
}
HTML,BODY,P,DIV {
font-family: Arial, Helvetica, Sans-Serif;
}
HTML,BODY,P,PRE,DIV {
lib/ASP4/ErrorHandler.pm view on Meta::CPAN
margin-left: 15px;
width: 95%;
padding: 10px;
overflow: auto;
border: solid 1px #808080;
background-color: #FFFFCC;
}
.clear {
clear: both;
}
.label {
view all matches for this distribution
view release on metacpan or search on metacpan
examples/tag_list.cgi view on Meta::CPAN
<body>
<script type="text/javascript" src="?js_print">
</script>
<style type="text/css">
.codepost {
background-color: #ffffff;
width: 80%;
height: auto;
white-space: nowrap;
overflow: scroll;
padding-left: 2px;
examples/tag_list.cgi view on Meta::CPAN
left: 0;
float: left;
position: static;
}
.quote {
background-color: #ebebeb;
width:80%;
border:1px solid gray;
padding: 1px;
margin: 1px;
top: 0;
view all matches for this distribution
view release on metacpan or search on metacpan
examples/cgi/WwwCounter/readme.html view on Meta::CPAN
}
H2 {
width: 100%;
font-weight: bold;
color: #ffffff;
background-color: #8484ee;
border: 1px none #8888f8;
border-top: 1px solid #8888f8;
border-left: 1px solid #8888f8;
border-right: 1px solid #666699;
border-bottom: 1px solid #666699;
examples/cgi/WwwCounter/readme.html view on Meta::CPAN
H3 {
width: 100%;
color: #ffffff;
font-weight: bold;
font-size: 1.3em;
background-color: #8484ee;
border: 1px none #8888f8;
border-top: 1px solid #8888f8;
border-left: 1px solid #8888f8;
border-right: 1px solid #666699;
border-bottom: 1px solid #666699;
examples/cgi/WwwCounter/readme.html view on Meta::CPAN
H4 {
width: 100%;
font-weight: bold;
font-size: 1em;
color: #ffffff;
background-color: #8484ee;
border: 1px none #8888f8;
border-top: 1px solid #ccccff;
border-left: 1px solid #ccccff;
border-right: 1px solid #666699;
border-bottom: 1px solid #666699;
examples/cgi/WwwCounter/readme.html view on Meta::CPAN
PRE.c {
border: 1px solid gray;
padding: 5px;
white-space: pre;
width: 100%;
background-color: #fffff0;
}
DT {
font-weight: bold;
}
OL LI P {
view all matches for this distribution
view release on metacpan or search on metacpan
share/AXLSoap.xsd view on Meta::CPAN
<xsd:element name="name" type="axlapi:UniqueString50" nillable="false"/>
<xsd:element name="description" type="axlapi:String128" nillable="false" minOccurs="0"/>
<xsd:element name="unlockPwd" type="axlapi:String50" nillable="false" minOccurs="0"/>
<xsd:element name="dndOption" type="axlapi:XDNDOption" nillable="false" minOccurs="0"/>
<xsd:element name="dndAlertingType" type="xsd:string" nillable="false" minOccurs="0"/><!--This field is of the type axl:XRingSetting in AXLEnums.xsd-->
<xsd:element name="backgroundImage" type="xsd:boolean" default="true" nillable="false" minOccurs="0"/>
<xsd:element name="phonePersonalization" type="axlapi:XPhonePersonalization" nillable="false" minOccurs="0"/>
<xsd:element name="phoneServiceDisplay" type="axlapi:XPhoneServiceDisplay" nillable="false" minOccurs="0"/>
<xsd:element name="sshUserId" type="axlapi:String50" minOccurs="0"/>
<xsd:element name="sshPwd" type="axlapi:String255" minOccurs="0"/>
<xsd:element name="alwaysUsePrimeLine" type="xsd:string" default="Default" minOccurs="0"/><!--This field is of the type axl:XStatus in AXLEnums.xsd-->
share/AXLSoap.xsd view on Meta::CPAN
<xsd:element name="newName" type="axlapi:String100" minOccurs="0"/>
<xsd:element name="description" type="axlapi:String128" nillable="false" minOccurs="0"/>
<xsd:element name="unlockPwd" type="axlapi:String50" nillable="false" minOccurs="0"/>
<xsd:element name="dndOption" type="axlapi:XDNDOption" nillable="false" minOccurs="0"/>
<xsd:element name="dndAlertingType" type="xsd:string" nillable="false" minOccurs="0"/><!--This field is of the type axl:XRingSetting in AXLEnums.xsd-->
<xsd:element name="backgroundImage" type="xsd:boolean" default="true" nillable="false" minOccurs="0"/>
<xsd:element name="phonePersonalization" type="axlapi:XPhonePersonalization" nillable="false" minOccurs="0"/>
<xsd:element name="phoneServiceDisplay" type="axlapi:XPhoneServiceDisplay" nillable="false" minOccurs="0"/>
<xsd:element name="sshUserId" type="axlapi:String50" minOccurs="0"/>
<xsd:element name="sshPwd" type="axlapi:String255" minOccurs="0"/>
<xsd:element name="alwaysUsePrimeLine" type="xsd:string" default="Default" minOccurs="0"/><!--This field is of the type axl:XStatus in AXLEnums.xsd-->
view all matches for this distribution
view release on metacpan or search on metacpan
Ace/Browser/SearchSubs.pm view on Meta::CPAN
}
=item AceSearchTable([{hash}],$title,@contents)
Given a title and the HTML contents, this formats the search into a
table and gives it the background and foreground colors used elsewhere
for searches. The formatted search is then printed.
The HTML contents are usually a fill-out form. For convenience, you
can provide the contents in multiple parts (lines or elements) and
they will be concatenated together.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/AsciiArt2HtmlTable.pm view on Meta::CPAN
=item * each line is a C<tr> element
=item * each letter is a C<td> element
=item * each C<td> has background of a specific color, which is
defined by the letter that created it
=back
=cut
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/AutoColor.pm view on Meta::CPAN
anyway:
$octarine = OCTARINE(); # '000000ff'
Beware: Using OCTARINE() may - depending on your location, status as wizard and general thaumic
background radiation levels - reconfigure your computer to display itself. This may result in
damage to your system, secondary thaumic events, creatures from the dungeon dimensions appearing
or the universe collapsing on itself.
=head1 SEE ALSO
view all matches for this distribution
view release on metacpan or search on metacpan
0.004 2013-07-14 19:21:01Z
- simplify creation of ad-hoc author object at build time
- (hopefully) fix html cell padding issue on metacpan
- use utf8 pragma, in case some names contain unicode characters
- include a bit of background to why I wrote this
- id=>name hash is also kept sorted
0.003 2013-07-06 01:04:20Z
- rewrite code and HTML generation by using embedded templates in
the .pm file and authors in __DATA__, and a custom Dist::Zilla
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANLists/PERLANCAR/Avoided.pm view on Meta::CPAN
'x.date' => '2017-09-08',
module => 'List::MoreUtils',
summary => 'License confusion and ',
description => <<'_',
For more information, see https://www.reddit.com/r/perl/comments/6ymdez/what_are_the_background_details_pertaining_to_the/.
Recent versions of <pm:List::Util> have implemented many functions from
<pm:List::MoreUtils>.
_
lib/Acme/CPANLists/PERLANCAR/Avoided.pm view on Meta::CPAN
Alternate modules: L<Log::ger>
=item * L<List::MoreUtils> - License confusion and
For more information, see https://www.reddit.com/r/perl/comments/6ymdez/what_are_the_background_details_pertaining_to_the/.
Recent versions of L<List::Util> have implemented many functions from
L<List::MoreUtils>.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANModules/CLI/Wrapper/UnixCommand.pm view on Meta::CPAN
'x.command' => 'rsync',
},
# ssh
{
summary => 'Wraps ssh to remember the background terminal color of each user+host you went to',
module => 'App::sshwrap::hostcolor',
script => 'sshwrap-hostcolor',
'x.command' => 'ssh',
},
lib/Acme/CPANModules/CLI/Wrapper/UnixCommand.pm view on Meta::CPAN
Author: L<PERLANCAR|https://metacpan.org/author/PERLANCAR>
Script: L<rsync-new2old>
=item * L<App::sshwrap::hostcolor> - Wraps ssh to remember the background terminal color of each user+host you went to
Author: L<PERLANCAR|https://metacpan.org/author/PERLANCAR>
Script: L<sshwrap-hostcolor>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANModules/FakeData.pm view on Meta::CPAN
=head1 DESCRIPTION
L<Data::Random> generates random number, random generated word, random
dictionary word (default wordlist provided), date (in YYYY-MM-DD format), time
(in HH::MM:SS format), datetime, image (just a blank PNG with random size and
background color).
L<Data::Maker> can generate realistic fake data including IP address, email,
password, person (first name, middle name, last name, SSN). It focuses on
performance (200 records/sec number is cited).
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Acme/CPANModules/UnixCommandWrappers.pm view on Meta::CPAN
'x.command' => 'rsync',
},
# ssh
{
summary => 'Wraps ssh to remember the background terminal color of each user+host you went to',
module => 'App::sshwrap::hostcolor',
script => 'sshwrap-hostcolor',
'x.command' => 'ssh',
},
lib/Acme/CPANModules/UnixCommandWrappers.pm view on Meta::CPAN
Script: L<rsync-new2old>
=item L<App::sshwrap::hostcolor>
Wraps ssh to remember the background terminal color of each user+host you went to.
Script: L<sshwrap-hostcolor>
=back
view all matches for this distribution
view release on metacpan or search on metacpan
devdata/https_mojolicious.io_blog_2017_12_13_day-13-more-about-roles view on Meta::CPAN
We feel that you should be explicit about requesting a non-literal class name and so we made this choice.</p>
<p>Now sometimes you don't instantiate the class, sometimes you have an instance given to you.
For example say the Mojo::DOM document came from a <a href="http://mojolicious.org/perldoc/Mojo/UserAgent">Mojo::UserAgent</a> request.
In this case you can still use <code>with_roles</code>.
What happens in this case is that a little magic happens in the background to add the functionality to the instance.</p>
<pre><code>my $dom = $ua
->get('http://mojolicious.org')
->res
->dom
view all matches for this distribution