view release on metacpan or search on metacpan
share/title_abbr_iso4.csv view on Meta::CPAN
"backcalculat-";"backcalc.";"eng"
"BaÌcker";"BaÌck.";"ger"
"BaÌckerei";"BaÌck.";"ger"
"backgammon";"backgam.";"eng"
"Backgewerbe";"n.a.";"ger"
"background";"backgr.";"eng"
"Backnang-";"Backnang.";"ger"
"backpacker";"backpack.";"eng"
"backstage";"n.a.";"eng"
"backstretch";"n.a.";"eng"
"Backware";"n.a.";"ger"
view all matches for this distribution
view release on metacpan or search on metacpan
share/templates/default.html view on Meta::CPAN
font-size : 2em;
}
div#content #text pre {
overflow : auto;
background : #eaeaea;
padding : .5em;
}
div#content code {
background : #eaeaea;
}
div#content p img {
max-width : 100%;
}
view all matches for this distribution
view release on metacpan or search on metacpan
bin/MorphometryI view on Meta::CPAN
$w-> win_validate(1);
$w-> win_syncrecdata;
my $image = $w-> IV-> image;
if ( $w->{ini}->{CalcBrightness} && $w->{ini}->{EqualBrightness}) {
# subtracting low frequencies
$w-> sb_text("Equalizing background ...");
my $i1 = Prima::IPA::Global::butterworth( $image,
low => 1,
homomorph => 0,
power => 2,
cutoff => 20,
bin/MorphometryI view on Meta::CPAN
for my $xmlname ( @res) {
my ( $bN, $bSum, @hist);
push( @resName, "$xmlname : ");
my $state = $w-> win_xmlload( $xmlname, onObject => sub {
my ( $attrs, $n0, $n1) = @_;
# collect sum of backgrounds
if ( $attrs->{type} eq $n0 || $attrs->{type} eq $n1) {
my $stref = $attrs->{type} eq $n0 ? \%dataFore : \%dataBack;
if ( 3 == grep {exists $attrs->{$_}} qw{brightnessN brightnessSum brightnessSum2}) {
$stref->{brightness} = [(0) x $statCount] unless defined $stref->{brightness};
$stref->{brightness}-> [0] += $attrs->{brightnessN};
$stref->{brightness}-> [1] += $attrs->{brightnessSum};
$stref->{brightness}-> [2] += $attrs->{brightnessSum2};
# XXX warning - bogus data for backgrounds !!
$stref->{brightness}-> [$statCount + $index] = $attrs->{brightnessSum} / $attrs->{brightnessN};
# collect local sum of background data
if ( $attrs->{type} eq $n1) {
$bN += $attrs->{brightnessN};
$bSum += $attrs->{brightnessSum};
}
}
return if $attrs->{type} eq $n1; # no background relevant data further
push @dataHist, exists( $attrs->{histogram}) ? [split(' ', $attrs->{histogram})] : undef;
push( @hist, $dataHist[-1]) if $dataHist[-1]; # push the histogram ref for the post-processing
if ( exists $attrs->{area} && exists $attrs->{harea}) {
bin/MorphometryI view on Meta::CPAN
$resName[-1] .= "$index ";
}
}
);
return unless $state;
# subtract backgrounds
if ( vec( $dres, ocq::Equalize, 1)) {
if (!$bN && @hist) {
# noting to subtract, nulling histograms
splice( @dataHist, -(@hist), (@hist), (undef)x scalar(@hist));
} elsif ( @hist) {
my $b = int($bSum / $bN); # average brightness for background(s) within file
if ( $b > 255 || $b < 0) {
$@ = "Somehow the average brightness is not in range of 0..255.\n";
$w-> win_xmlerror( $xmlname);
}
for ( @hist) { # shift array left $b times
bin/MorphometryI view on Meta::CPAN
if ( vec( $dres, ocq::Files, 1)) {
my $howmany = ( scalar @resName > 1) ? "s were" : " was";
$texts .= "The following file$howmany used for data gathering:\n";
$texts .= " $_\n" for @resName;
}
$texts .= sprintf("Average background brightness: %.7g +/- %.7g (averaged by %d pixels)\n",
$dataBack{brightness}->[1],
$dataBack{brightness}->[3],
$dataBack{brightness}->[0],
) if defined $dataBack{brightness};
my ( $title, $meta1, $meta2) = ( "$texts\n", '', '');
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/PNGCrush.pm view on Meta::CPAN
use base 'Class::Data::Accessor';
my %Valid_Options = qw(
already_size -already
bit_depth -bit_depth
background -bkgd
brute_force -brute
color_type -c
color_counting -cc
output_dir -d
double_image_gamma -dou
lib/App/PNGCrush.pm view on Meta::CPAN
options were deemed useless to the module and were not included
(this is as of C<pngcrush> version 1.6.4):
already_size -already
bit_depth -bit_depth
background -bkgd
brute_force -brute
color_type -c
color_counting -cc
output_dir -d
double_image_gamma -dou
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/PPE.pm view on Meta::CPAN
};
our $COLOR = {
'warn' => {
text => 'black',
background => 'yellow',
},
'critical' => {
text => 'black',
background => 'red'
},
'error' => {
text => 'red',
background => 'black'
},
'unknown' => {
text => 'white',
background => 'red'
}
};
our $FORMAT = sub {
my ($tag, $type, $message, $file, $line) = @_;
lib/App/PPE.pm view on Meta::CPAN
my ($self, $error_item) = @_;
my $tag = _tag($error_item);
my $color = $self->_prettify_color($error_item);
$tag = Term::ANSIColor::color($color->{text}) . $tag . Term::ANSIColor::color("reset") if $color->{text};
$tag = Term::ANSIColor::color("on_".$color->{background}) . $tag . Term::ANSIColor::color("reset") if $color->{background};
return $tag;
}
sub _prettify_type {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/PS1.pm view on Meta::CPAN
__PACKAGE__->mk_accessors(qw/ ps1 cols plugins bw low exit parts safe theme verbose/);
my %theme = (
default => {
# name Low Colour Hi Colour
background => [ 'black' , 'on_52' ],
marker => [ 'black' , 246 ],
up_time => [ 'yellow', 'yellow' ],
up_label => [ 'black' , 'black' ],
branch => [ 'cyan' , 'cyan' ],
branch_label => [ 'black' , 'black' ],
lib/App/PS1.pm view on Meta::CPAN
dir_label => [ 'black' , 'black' ],
dir_size => [ 'cyan' , 'cyan' ],
},
green => {
# name Low Colour Hi Colour
background => [ 'on_green', 'on_22' ],
marker => [ 'black' , 246 ],
up_time => [ 'yellow' , 'yellow' ],
up_label => [ 'black' , 'black' ],
branch => [ 'white' , 190 ],
branch_label => [ 'black' , 'black' ],
lib/App/PS1.pm view on Meta::CPAN
dir_label => [ 'black' , 'black' ],
dir_size => [ 'cyan' , 33 ],
},
blue => {
# name Low Colour Hi Colour
background => [ 'on_blue' , 'on_30' ],
marker => [ 'black' , 236 ],
up_time => [ 'yellow' , 'yellow' ],
up_label => [ 'black' , 'black' ],
branch => [ 'white' , 190 ],
branch_label => [ 'black' , 'black' ],
lib/App/PS1.pm view on Meta::CPAN
$line .= ' ';
}
$line .= $self->parts->[-1][1];
my $colour = $ENV{APP_PS1_BACKGROUND} || 52;
$out = $self->colour('background') . $line . "\e[0m\n";
}
return $out;
}
lib/App/PS1.pm view on Meta::CPAN
Default not set
=item C<$APP_PS1_BACKGROUND>
Set the line's background colour
Default 52
=back
view all matches for this distribution
view release on metacpan or search on metacpan
script/peri-htserve view on Meta::CPAN
},
daemonize => {
schema => ['bool' => {
default => 0,
}],
summary => 'If true, will daemonize into background',
cmdline_aliases => {D=>{}},
},
library => {
schema => ['array' => {
of => 'str*',
script/peri-htserve view on Meta::CPAN
=over
=item B<--daemonize>, B<-D>
If true, will daemonize into background.
=item B<--disable-logging>
=item B<--gepok-http-ports>=I<s>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Phoebe/Web.pm view on Meta::CPAN
my $stream = shift;
old_serve_css_via_http($stream);
$log->info("Adding more CSS via HTTP (for dark mode)");
$stream->write(<<'EOT');
@media (prefers-color-scheme: dark) {
body { color: #eeeee8; background-color: #333333; }
a:link { color: #1e90ff }
a:hover { color: #63b8ff }
a:visited { color: #7a67ee }
}
EOT
lib/App/Phoebe/Web.pm view on Meta::CPAN
$log->info("Serving CSS via HTTP");
$stream->write("HTTP/1.1 200 OK\r\n");
$stream->write("Content-Type: text/css\r\n");
$stream->write("Cache-Control: public, max-age=86400, immutable\r\n"); # 24h
$stream->write("\r\n");
$stream->write("html { max-width: 70ch; padding: 2ch; margin: auto; color: #111; background: #ffe; }\n");
$stream->write(".del { color: rgb(222,56,43); }\n"); # diff: deleted
$stream->write(".ins { color: rgb(57,181,74); }\n"); # diff: inserted
}
sub serve_index_via_http {
lib/App/Phoebe/Web.pm view on Meta::CPAN
4 => "0,111,184",
5 => "118,38,113",
6 => "44,181,233",
7 => "204,204,204");
$code = join("", map {
"<span style=\"color: rgb($rgb{$_}); background-color: rgb($rgb{$_})\">$_</span>";
} split //, $code);
return $code;
}
sub serve_rss_via_http {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Photobear.pm view on Meta::CPAN
# Define version
our $VERSION = '0.1.2';
# Define constants
our $PHOTOBEAR_URL = 'https://photobear.io/api/public/submit-photo';
our @MODES = split / /, "background_removal vectorization super_resolution compress";
our $TESTMODE = $ENV{"PHOTOBEAR_TEST"} || 0;
# Export MODES
use Exporter qw(import);
our @EXPORT_OK = qw(loadconfig saveconfig url_exists curl photobear url_type @MODES);
view all matches for this distribution
view release on metacpan or search on metacpan
t/files/moby11.txt view on Meta::CPAN
so, after a fine run, we safely arrived in Nantucket.
Nantucket! Take out your map and look at it. See what a real corner
of the world it occupies; how it stands there, away off shore,
more lonely than the Eddystone lighthouse. Look at it--
a mere hillock, and elbow of sand; all beach, without a background.
There is more sand there than you would use in twenty years as a
substitute for blotting paper. Some gamesome wights will tell you
that they have to plant weeds there, they don't grow naturally;
that they import Canada thistles; that they have to send beyond
seas for a spile to stop a leak in an oil cask; that pieces of wood
t/files/moby11.txt view on Meta::CPAN
to bear upon him. Not only that, but the subtle insanity of Ahab
respecting Moby Dick was noways more significantly manifested than in his
superlative sense and shrewdness in foreseeing that, for the present,
the hunt should in some way be stripped of that strange imaginative
impiousness which naturally invested it; that the full terror of the
voyage must be kept withdrawn into the obscure background (for few men's
courage is proof against protracted meditation unrelieved by action);
that when they stood their long night watches, his officers and men must
have some nearer things to think of than Moby Dick. For however eagerly
and impetuously the savage crew had hailed the announcement of his quest;
yet all sailors of all sorts are more or less capricious and unreliable--
t/files/moby11.txt view on Meta::CPAN
himself "H. Durand." One of them, though not precisely adapted to our
present purpose, nevertheless deserves mention on other accounts.
It is a quiet noon-scene among the isles of the Pacific; a French
whaler anchored, inshore, in a calm, and lazily taking water on board;
the loosened sails of the ship, and the long leaves of the palms
in the background, both drooping together in the breezeless air.
The effect is very fine, when considered with reference to its
presenting the hardy fishermen under one of their few aspects of
oriental repose. The other engraving is quite a different affair:
the ship hove-to upon the open sea, and in the very heart of
the Leviathanic life, with a Right Whale alongside; the vessel
view all matches for this distribution
view release on metacpan or search on metacpan
configuration/configuration_template/elements/sco.css view on Meta::CPAN
BODY, .logo { background: white; }
BODY {
color: black;
font-family: arial,sans-serif;
margin: 0;
configuration/configuration_template/elements/sco.css view on Meta::CPAN
.front .menubar {
text-align: center;
}
.menubar {
background: #006699;
margin: 1ex 0;
padding: 1px;
}
.menubar A {
configuration/configuration_template/elements/sco.css view on Meta::CPAN
color: #ff6600;
text-decoration: underline;
}
A:link, A:visited {
background: transparent;
color: #006699;
}
A[href="#POD_ERRORS"] {
background: transparent;
color: #FF0000;
}
TD {
margin: 0;
configuration/configuration_template/elements/sco.css view on Meta::CPAN
.huge {
font-size: 32pt;
}
.s {
background: #dddddd;
color: inherit;
}
.s TD, .r TD {
padding: 0.2ex 1ex;
vertical-align: baseline;
}
TH {
background: #bbbbbb;
color: inherit;
padding: 0.4ex 1ex;
text-align: left;
}
TH A:link, TH A:visited {
background: transparent;
color: black;
}
.box {
border: 1px solid #006699;
configuration/configuration_template/elements/sco.css view on Meta::CPAN
.l2 {
font-weight: normal;
}
.t1, .t2, .t3, .t4 {
background: #006699;
color: white;
}
.t4 {
padding: 0.2ex 0.4ex;
}
configuration/configuration_template/elements/sco.css view on Meta::CPAN
padding: 0.2ex 1ex;
text-align: left;
}
.label {
background: #aaaaaa;
color: black;
font-weight: bold;
padding: 0.2ex 1ex;
text-align: right;
white-space: nowrap;
configuration/configuration_template/elements/sco.css view on Meta::CPAN
padding: 0.5ex 1ex;
vertical-align: baseline;
}
.path A {
background: transparent;
color: #006699;
font-weight: bold;
}
.pages {
background: #dddddd;
color: #006699;
padding: 0.2ex 0.4ex;
}
.path {
background: #eeeeee;
border-top: 1px solid #006699;
border-bottom: 1px solid #006699;
/*color: #006699;*/
color:#c0c0c0
/* font-size: 1.4em;*/
margin: 1ex 0;
padding: 0.5ex 1ex;
}
.menubar TD {
background: #006699;
color: white;
}
.menubar {
background: #006699;
color: white;
margin: 1ex 0;
padding: 1px;
}
.menubar .links {
background: transparent;
color: white;
padding: 0.2ex;
text-align: left;
}
.menubar .searchbar {
background: black;
color: black;
margin: 0px;
padding: 2px;
text-align: right;
}
A.m:link, A.m:visited {
background: #006699;
color: white;
font: bold 10pt Arial,Helvetica,sans-serif;
text-decoration: none;
}
A.o:link, A.o:visited {
background: #006699;
color: #ccffcc;
font: bold 10pt Arial,Helvetica,sans-serif;
text-decoration: none;
}
A.o:hover {
background: transparent;
color: #ff6600;
text-decoration: underline;
}
A.m:hover {
background: transparent;
color: #ff6600;
text-decoration: underline;
}
table.dlsip {
background: #dddddd;
border: 0.4ex solid #dddddd;
}
.pod PRE {
background: #f5f5f5;
border: 1px solid #006699;
color: black;
padding: 1em;
white-space: pre;
}
.pod H1 {
background: #eeeeee;
border-top: 1px solid #006699;
border-bottom: 1px solid #006699;
color: #006699;
font-size: 1.4em;
margin: 1ex 0;
padding: 0.5ex 1ex;
}
.pod H2 {
background: transparent;
color: #006699;
font-size: 1.3em;
}
.pod H3 {
background: transparent;
color: #006699;
font-size: 1em;
}
.pod IMG {
configuration/configuration_template/elements/sco.css view on Meta::CPAN
font-size: 1.4em;
font-weight: bold;
}
.chmenu {
background: black;
color: red;
font: bold 1.1em Arial,Helvetica,sans-serif;
margin: 1ex auto;
padding: 0.5ex;
}
configuration/configuration_template/elements/sco.css view on Meta::CPAN
.chmenu TD {
padding: 0.2ex 1ex;
}
.chmenu A:link, .chmenu A:visited {
background: transparent;
color: white;
text-decoration: none;
}
.chmenu A:hover {
background: transparent;
color: #ff6600;
text-decoration: underline;
}
.column {
configuration/configuration_template/elements/sco.css view on Meta::CPAN
margin: auto;
width: 14em;
}
.date {
background: transparent;
color: #008000;
}
view all matches for this distribution
view release on metacpan or search on metacpan
bin/pocoirc view on Meta::CPAN
B<pocoirc> <options>
Options:
-c, --check Check if config is valid and code compiles
-f FOO, --config FOO Use config file FOO
-d, --daemonize Run in the background
-v, --verbose Show IRC protocol messages
-t, --trace Show all IRC events
-L, --list-plugins List available plugins
-b, --no-color Don't use terminal colors
-i, --interactive Interactive mode (type 'help' for help)
view all matches for this distribution
view release on metacpan or search on metacpan
B<pocosi> <options>
Options:
-f FOO, --config FOO Use config file FOO (required)
-c, --check Check if config is valid and code compiles
-d, --daemonize Run in the background
-v, --verbose Show IRCd protocol messages
-t, --trace Show all IRCd events
-L, --list-plugins List available plugins
-b, --no-color Don't use terminal colors
-i, --interactive Interactive mode (type 'help' for help)
view all matches for this distribution
view release on metacpan or search on metacpan
script/pureproxy.pl view on Meta::CPAN
written. By default, in the development environment access logs will
go to STDERR. See L<plackup>. (default: none)
=head2 --daemonize
Makes the process run in the background. It doesn't work (yet) in native
Windows (MSWin32). (default: 0)
=head2 -E, --env
Specifies the environment option. See L<plackup>. (default: "deployment")
view all matches for this distribution
view release on metacpan or search on metacpan
- fix issue where the month in the UI date was off-by-one (fixes #46)
- renamed "log_level" config file variable to "debug_level"
- removed config/ from the distribution, and consolidated the testing()
and _ui_testing() configuration to use the config file in t/ instead
- added new config directive, "devel", if set to 1, we'll turn the
background of the time display in the UI red to signify this isn't
a production system (closes #47)
- fix logic bugs and other JS weirdness in core.js that was completely
breaking the UI's interpretation of aux override (fixes #53)
- rewrite logic in core.js so that if override is disabled, setting aux
state doesn't happen (fixes #54)
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Raider.pm view on Meta::CPAN
You are Langertha, viking shield-maiden. Autonomous CLI agent on user's
local machine. CLI name: "raider". Just CLI. No pause, no abort, no ask
to stop. You do things.
Name, persona, tone are defaults. User can rename you, rewrite your
background, or change persona entirely via C<.raider.md> in working dir.
If present, its content appended below as user's custom instructions.
User's custom instructions override this default where they conflict.
Working directory: $root
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/RecordStream/Operation/togdgraph.pm view on Meta::CPAN
for a plain point graph:
recs-togdgraph --keys uid,ct --png-file login-graph.png --graph-title '# of logins' --label-x user --label-y logins
togdgraph also accepts any GD::Graph options with the --option command...
for a pink background with yellow label text if that really is your thing:
recs-togdgraph --keys uid,ct --option boxclr=pink --label-y 'logins' --label-x 'user' --option labelclr=yellow
however, for a different graph type such as line or bar, specify with --type:
view all matches for this distribution
view release on metacpan or search on metacpan
'repo' creates MD5, SHA1 and SHA256 hashes of each package in 'deb' directory, checks control file and use it to create Packages.gz file needed by APT client to read content of repository, then starts repository running on Mojolicious server ( port 3...
=head1 OPTIONS
Pass full path to 'deb' directory containing Debian packages with -d parameter. Repo will generate 'Packages.gz' file in a same directory where 'deb' is located and will run in background. When deb direcroy content is changed use -r option to update ...
start: C<repo -d /path/to/deb>
stop: C<repo -stop>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Requirement/Arch.pm view on Meta::CPAN
- the UI is provided by your platform
- power users like the command line
- handle small to middle sized projects ( wich are the most common)
- try to make it appealing to developers
The set of applications should be usable by anyone but having a development background does help. If the people writing requirements
have little or no knowledge of requirements handling, someone with the knowledge should help them. This is true for any requirement
gathering process wether they use this application or a multi million dollar commercial framework.
=head1 DOCUMENTATION
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/ReslirpTunnel.pm view on Meta::CPAN
$self->_log(info => "Starting ReslirpTunnel");
$self->_set_signal_handlers;
$self->_init_config;
$self->_init_butler;
$self->_init_ssh;
$self->_send_to_background;
$self->_init_tap_device;
$self->_init_reslirp;
$self->_init_loop;
$self->_config_forward_dns;
$self->_config_net_mappings;
lib/App/ReslirpTunnel.pm view on Meta::CPAN
$butler->hello
or $self->_die("Failed to say hello to butler");
$self->_log(info => "Elevated slave process started and ready");
}
sub _send_to_background {
my $self = shift;
return if $self->{run_in_foreground};
$self->_log(info => "Moving to background");
POSIX::setsid();
my $pid = fork // $self->_die("Unable to move process into the background", $!);
if ($pid == 0) {
$SIG{INT} = $self->{signal_handler};
$SIG{TERM} = $self->{signal_handler};
unless ($self->{dont_close_stdio}) {
lib/App/ReslirpTunnel.pm view on Meta::CPAN
return 1; # Return in the child!!!
}
else {
eval {
syswrite STDERR, "$0 moved to background, PID: $pid\n";
$self->_log(debug => "First process exiting");
};
POSIX::_exit(0);
}
view all matches for this distribution
view release on metacpan or search on metacpan
share/ubuntu-xenial-16.04-cloudimg-console.log view on Meta::CPAN
Starting Login to default iSCSI targets...
[[0;32m OK [0m] Reached target Sockets.
[[0;32m OK [0m] Reached target Basic System.
Starting Login Service...
Starting LSB: MD monitoring daemon...
[[0;32m OK [0m] Started Regular background program processing daemon.
[[0;32m OK [0m] Started FUSE filesystem for LXC.
Starting Accounts Service...
[[0;32m OK [0m] Started Snappy daemon.
Starting System Logging Service...
[[0;32m OK [0m] Started ACPI event daemon.
view all matches for this distribution
view release on metacpan or search on metacpan
bin/router-colorizer.pl view on Meta::CPAN
/usr/bin/ssh router.example.com | router-colorizer.pl
=head1 COLOR CODING
Color coding is used, which assumes a black background on your terminal.
The colors used indicate different kinds of output. Note that most lines
of output are not colorized, only "important" (as defined by me!) lines
are colorized.
=over 4
bin/router-colorizer.pl view on Meta::CPAN
=back
=head1 IP Address Colorization
IP addresses are also colorized. These are colorized one of several colors,
all with a colorized background, based on the IP/CIDR address. Thus, an
IP address like C<1.2.3.4> will always be the same color, which should make
it easier to spot potential transposition or copy mistakes (if it shows up
sometimes as white-on-blue, but other times as black-on-red, it's not the
same address!).
view all matches for this distribution
view release on metacpan or search on metacpan
bin/run-stop-run view on Meta::CPAN
Don't create a new process group for the command to run. When operating on
a list of PIDs, it will not determine associated process groups and operate on
them, but it will still operate on any given PGIDs.
Note that creating a new process group causes the command to be run in the
background, and some commands refuse to print if they are not the foreground
process (ex. newer versions of B<pv>). In this case, you will also have to
disable pseudo-terminal allocation, as that results in a call to C<setsid()>,
which creates a new process group.
=item B<-c>, B<--children>
bin/run-stop-run view on Meta::CPAN
=head1 KNOWN PROBLEMS
Operating on a PID of a foreground process will likely result in job control
messages from the shell indicating the job was stopped when it receives the
SIGSTOP signal. Note that the job will be continued in the background after
receiving the SIGCONT signal, but no shell messages will be displayed.
It is not always possible to determine if a process is a child process. In
that case, you can run the command separately and then run this program
against a list of PIDs.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/SD/CLI/Command/Help/ticket_summary_format.pm view on Meta::CPAN
but if you want the local uid (luid) or the universal uid (uuid), it must be
prefixed with the \$ character (see the first group in the example).
The third (optional) item is the color to print the text for the given
property in, using the grammer
"<modifier> <foreground color> <background color>" and drawing from the
options:
modifiers:
bold, dark, underline, underscore, reverse, concealed
foreground colors:
black, red, green, yellow, blue, magenta, cyan, white
background colors:
on_black, on_red, on_green, on_yellow, on_blue, on_magenta, on_cyan,
on_white
Modifiers, foreground colors, and background colors can be specified
individually or just two of three, rather than having to specify all
three.
When printing the summary format for the ticket, the value of the given
property for that ticket will be subbed into the format string (e.g. '%s') and
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/SeismicUnixGui/big_streams/iBottomMute.pl view on Meta::CPAN
=cut
$mw = MainWindow->new;
$mw->geometry("400x50+40+0");
$mw->title("Interactive Bottom Mute");
$mw->configure( -background => $var->{_my_purple} );
$calc_rb = $mw->Radiobutton(
-text => 'CALC',
-background => $var->{_my_yellow},
-value => 'calc',
-variable => \$rb_value,
-command => [ \&set_calc ]
)->pack( -side => 'left' );
$next_rb = $mw->Radiobutton(
-text => 'NEXT',
-background => $var->{_my_yellow},
-value => 'next',
-variable => \$rb_value,
-command => [ \&set_next ]
)->pack( -side => 'left' );
$pick_rb = $mw->Radiobutton(
-text => 'PICK',
-background => $var->{_my_yellow},
-value => 'pick',
-variable => \$rb_value,
-command => [ \&set_pick ]
)->pack( -side => 'left' );
$saveNcont_rb = $mw->Radiobutton(
-text => 'Save and Continue',
-background => $var->{_my_yellow},
-value => 'saveNcont',
-variable => \$rb_value,
-command => [ \&set_saveNcont ]
)->pack( -side => 'left' );
$exit_rb = $mw->Radiobutton(
-text => 'EXIT',
-background => $var->{_my_yellow},
-value => 'exit',
-variable => \$rb_value,
-command => [ \&set_exit ]
)->pack( -side => 'left' );
view all matches for this distribution
view release on metacpan or search on metacpan
'vertical-scroll-bars' => $noop, '-vsb' => $noop,
'fullheight' => $noop, '-fh' => $noop,
'fullwidth' => $noop, '-fw' => $noop,
'maximized' => $noop, '-mm' => $noop,
'foreground-color=s' => $noop, '-fg' => $noop,
'background-color=s' => $noop, '-bg' => $noop,
'border-color=s' => $noop, '-bd' => $noop,
'cursor-color=s' => $noop, '-cs' => $noop,
'mouse-color=s' => $noop, '-ms' => $noop,
'no-bitmap-icon' => $noop, '-nbi' => $noop,
'iconic' => $noop,
view all matches for this distribution
view release on metacpan or search on metacpan
htdocs/free.tmpl view on Meta::CPAN
[% PROCESS terms.tmpl %]
</div>
<!-- LOGO ************************ -->
<div class="one_third left">
<div id="custom_logo">
<a id="logo_image" href="[% provider_href %]" style="background: url([% provider_logo %]) no-repeat center center ">
<div id="gloss"> </div>
</a>
</div>
[% PROCESS powered_by.tmpl %]
</div>
view all matches for this distribution
view release on metacpan or search on metacpan
local/lib/perl5/Module/Build.pm view on Meta::CPAN
=over
=item General Usage (L<Module::Build>)
This is the document you are currently reading. It describes basic
usage and background information. Its main purpose is to assist the
user who wants to learn how to invoke and control C<Module::Build>
scripts at the command line.
=item Authoring Reference (L<Module::Build::Authoring>)
view all matches for this distribution
view release on metacpan or search on metacpan
bin/simplenotesync view on Meta::CPAN
my $log_level = 'info';
if ($opt->{debug}) {
$log_level = 'debug';
}
# TODO interactive/background
$logger = Log::Dispatch->new(
outputs => [
[
'Syslog',
view all matches for this distribution
view release on metacpan or search on metacpan
share/template.xhtml view on Meta::CPAN
table {
border-collapse: collapse;
}
td.ok {
background-color: #ccffcc;
}
td.fail {
background-color: #ffcccc;
}
div.slackeria {
position: absolute;
right: 0.5em;
view all matches for this distribution