view release on metacpan or  search on metacpan

lib/App/ptimeout.pm  view on Meta::CPAN

    my $stderr_buffer = '';
    my $held_line;

    # Loop while the process we're monitoring does its thang
    while(1) {
        # The background process is running, and its STDERR is being captured.
        # If it's said anything on its STDERR, flush it to the *real* STDERR.
        _pump_stderr(
            $stderr_reader,
            \$stderr_buffer,
            \$held_line,

 view release on metacpan or  search on metacpan

README  view on Meta::CPAN

      Force chart foreground color.

    --bg COLOR_NAME

      Force chart background color.

    --[no]loadavg

      Use load average <https://en.wikipedia.org/wiki/Load_(computing)>
      metric instead of CPU utilization. You might want to set the --max

README  view on Meta::CPAN

 Color scheme

    If you only see the memory usage bars but no CPU utilization chart,
    that's because your terminal's color scheme need an explicit
    distinction between foreground and background colors. For instance,
    "red on red background" will be displayed as a red block on such
    terminals. Thus, you may need the ANSI bright attribute for greater
    contrast, or maybe consider switching to the 256-color palette. There
    are some issues with that, though:

      1. Other color schemes (notably, solarized

 view release on metacpan or  search on metacpan

lib/App/remarkpl/public/basic.css  view on Meta::CPAN

body { font-family: 'Droid Serif'; }
a { color: #222; }
h1, h2, h3 { font-family: 'Yanone Kaffeesatz'; font-weight: normal; }
img { max-width: 100%; }

.remark-container { background: #222; }
.remark-slide-scaler { box-shadow: none; }
.remark-slide-content { background: #f8f8f4; color: #111; }
.remark-code, .remark-inline-code { font-family: 'Ubuntu Mono'; }

.inverse { background: #222; color: #dde; }
.inverse.contrast { background: #000; color: #fff; }
.inverse a { color: #dde; }
.inverse h1, .inverse h2 { color: #f3f3f3; line-height: 0.8em; }

 view release on metacpan or  search on metacpan

lib/App/revealup.pm  view on Meta::CPAN

    ## This is a third title

    ---

    ## This is a forth title
    <!-- .slide: data-background="#f70000" data-transition="page" -->
    
    You can add slide attributes like above.

    Note:
    This is a speaker note. It can be viewed in the speaker mode, just press S during the presentation to view notes and other useful information.

 view release on metacpan or  search on metacpan

lib/App/ruler.pm  view on Meta::CPAN

    args => {
        length => {
            schema => ['int*', min=>0],
            cmdline_aliases => {l=>{}},
        },
        background_pattern => {
            schema => ['str*', min_len=>1],
            default => '-',
            cmdline_aliases => {bg=>{}},
        },
        background_color => {
            schema => ['str*'],
        },

        major_tick_every => {
            schema => ['int*', min=>1],

lib/App/ruler.pm  view on Meta::CPAN

            args => {},
        },
        {
            summary => 'White ruler with red marks and numbers',
            args => {
                background_color => "black on_white",
                minor_tick_character => '',
                major_tick_color => "red on_white",
                number_color => "bold red on_white",
            },
        },

lib/App/ruler.pm  view on Meta::CPAN

    my %args = @_;

    my $ruler_len = $args{length} // $term_width;
    my $use_color;

    # draw background
    my $bgpat = $args{background_pattern} // '-';
    my $ruler = $bgpat x (int($ruler_len / length($bgpat)) + 1);
    if ($args{background_color}) {
        $use_color++;
        $ruler = _colored($ruler, $args{background_color});
    }

    # draw minor ticks
    my $mintickchar = $args{minor_tick_character} // '.';
    if ($args{minor_tick_color} && length($mintickchar)) {

lib/App/ruler.pm  view on Meta::CPAN

This document describes version 0.060 of App::ruler (from Perl distribution App-ruler), released on 2019-07-30.

=head1 TIPS

To see background pattern, disable minor ticking by using C<< -m '' >>.

To disable numbering, set number format to an empty string: C<< -f '' >> or C<<
--number-every 0 >>.

=head1 FUNCTIONS

lib/App/ruler.pm  view on Meta::CPAN

 ".........|10.......|20.......|30.......|40.......|50.......|60.......|70.......|80.......|90.......|100......|110......|120......|130......|140......|150......|160......|170......|180......|19"

=item * White ruler with red marks and numbers:

 ruler(
 background_color     => "black on_white",
   major_tick_color     => "red on_white",
   minor_tick_character => "",
   number_color         => "bold red on_white"
 );

lib/App/ruler.pm  view on Meta::CPAN

Arguments ('*' denotes required arguments):

=over 4

=item * B<background_color> => I<str>

=item * B<background_pattern> => I<str> (default: "-")

=item * B<length> => I<int>

=item * B<major_tick_character> => I<str> (default: "|")

 view release on metacpan or  search on metacpan

bin/sbozyp  view on Meta::CPAN

            # Sources stored from previous downloads have already been md5 checked
            sbozyp_print_stderr("$pkg->{PKGNAME}: using previously downloaded src: $src_filename\n");
            sbozyp_copy("$CONFIG{SRCDIR}/$src_filename", "$staging_dir/$src_filename");
        } else {
            my $md5 = $url_md5{$url};
            sbozyp_system('wget', '-e', 'background=off', '-O', "$staging_dir/$src_filename", $url);
            unless ($skip_md5) {
                my $got_md5 = do {
                    my $fh = sbozyp_open('<', "$staging_dir/$src_filename");
                    binmode($fh);
                    Digest::MD5->new->addfile($fh)->hexdigest;

 view release on metacpan or  search on metacpan

script/screenorama  view on Meta::CPAN

<!DOCTYPE html>
<html>
<head>
  <title>screenorama - <%= app->config->{program} %> <%= join ' ', @{app->config->{program_args}} %></title>
  %= stylesheet begin
body { background: #111; padding: 8px; }
body, .shell { font-size: 13px; font-family: monospace; color: #eee; margin: 0; padding: 0; }
pre { margin: 0; padding: 0; }
.status { border-top: 1px solid #333; margin-top: 20px; }
input { position: absolute; left: -600px; }
  % end

script/screenorama  view on Meta::CPAN

  screenorama.replaceColors.span = false;

  if (!a && typeof b == 'undefined') { return closing; } // regular

  if (termColors[b]) style.push('color: ' + termColors[b]);
  else if (termColors[a]) style.push('background-color: ' + termColors[a]);

  if (a == 1) { style.push('font-weight: bold'); }
  else if (a == 4) { style.push('text-decoration: underline'); }

  screenorama.replaceColors.span = true;

 view release on metacpan or  search on metacpan

script/cdif  view on Meta::CPAN

    option --dark  --dark-cmy

Automatic setting is done by L<Getopt::EX::termcolor> module and it
works with macOS Terminal.app and iTerm.app, and other XTerm
compatible terminals.  This module accepts environment variable
L<TERM_BGCOLOR> as a terminal background color.  For example, use
C<000> or C<#000000> for black and C<555> or C<#FFFFFF> for white.

Option B<--autocolor> is set by default, so override it to do nothing
to disable.

 view release on metacpan or  search on metacpan

lib/App/sdview/Output/Formatted.pm  view on Meta::CPAN

   $_nextblank = !!$typestyle{blank_after};

   my @lines = $text->split( qr/\n/ );
   @lines or @lines = ( String::Tagged->new ) if defined $leader;

   # If there's a background set, then space-pad every line to the same width
   # so it looks neater on the terminal
   #   https://rt.cpan.org/Ticket/Display.html?id=140536
   if( defined $typestyle{bg} ) {
      my $width = max map { length $_ } @lines;
      $_ .= " " x ( $width - length $_ ) for @lines;

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

	- fixed bug concerning declare/typeset and "Token count wrong!" 
	- fixed bug where a | embedded in a string was seen as a pipe
	- fixed bugs concerning commands embedded in quotes
	- conversion of advise command in back-ticks changed to be a concat. string
	- support for trap - see documentation for restrictions 
	- the & operator (run in background) is now placed inside a system call.
	- improvements to 'here' document handling
	- improvements to $* handling
	- improvements to redirection
	- improvements to testing, including the provision of main()
0.06  Sun Feb 08 17:00:00 2009

 view release on metacpan or  search on metacpan

share/album/index.css  view on Meta::CPAN

body
{
  padding: 0;
  margin: 0;
  border: 0;
  background: #111;
  color: #fff;
}

h2
{

 view release on metacpan or  search on metacpan

lib/App/sshwrap/hostcolor.pm  view on Meta::CPAN

    print $fh @lines;
    truncate $fh, tell($fh);
}

1;
# ABSTRACT: SSH wrapper script to remember the terminal background you use for each host

__END__

=pod

=encoding UTF-8

=head1 NAME

App::sshwrap::hostcolor - SSH wrapper script to remember the terminal background you use for each host

=head1 VERSION

This document describes version 0.009 of App::sshwrap::hostcolor (from Perl distribution App-sshwrap-hostcolor), released on 2019-07-26.

 view release on metacpan or  search on metacpan

share/wrapper.html.tt  view on Meta::CPAN

        text-align: left;
        font-family: 'Yanone Kaffeesatz';
        font-weight: normal;
      }
      div.nx-header-flag-1 {
        background-color: #000000;
        background: -webkit-gradient(linear, left top, right top, color-stop(0%,#ffffff),
                                                                  color-stop(100%,#005bbb) );
        position: fixed;
        top: 0px;
        left: 0px;
        height: 30px;
        width: 100%;
        text-align: left;
      }
      div.nx-header-flag-2 {
        background-color: #000000;
        background: -webkit-gradient(linear, left top, right top, color-stop(0%,#ffffff),
                                                                  color-stop(100%,#ffd500) );
        position: fixed;
        top: 29px;
        left: 0px;
        height: 30px;

share/wrapper.html.tt  view on Meta::CPAN

        position: fixed;
        bottom: 0px;
        left: 0px;
        height: 40px;
        width: 100%;
        background: white;
      }
      div.nx-footer p {
        margin-top: 10px;
        margin-bottom: 10px;
        height: 30px;

 view release on metacpan or  search on metacpan

lib/App/tkiv.pm  view on Meta::CPAN

    slideFull		=> 0,
	display images auto-fit in slide-show mode. default 0 (off)

    slideCover		=> 0,
	EXPERIMENTAL
	cover the background when in slideshow mode

    titleDirs		=> 0
	The number of dir levels (counted from the end) that should be included
	in the image title

lib/App/tkiv.pm  view on Meta::CPAN

=item save/load from .ivrc buttons on option window

=item Slideshow

 - behavior: location, dir depth, cycling
 - randomness, slide lists, full screen background (no decoration)
 - playlist
 - loop control
 - Auto-sense image load time for slideshows

=item Image manipulation

 view release on metacpan or  search on metacpan

lib/Traveller/Mapper.pm  view on Meta::CPAN

      #hex {
        stroke-width: 3pt;
        fill: none;
        stroke: black;
      }
      #background {
        fill: inherit;
      }
      #bg {
        fill: inherit;
      }

lib/Traveller/Mapper.pm  view on Meta::CPAN

  my $scale = 100;
  return sprintf($template,
		 map { sprintf("%.3f", $_ * $scale) }
		 # viewport
		 -0.5, -0.5, 3 + ($self->width - 1) * 1.5, ($self->height + 1.5) * sqrt(3),
		 # empty hex, once for the backgrounds and once for the stroke
		 @hex,
		 @hex,
		 # framing rectangle
		 -0.5, -0.5, 3 + ($self->width - 1) * 1.5, ($self->height + 1.5) * sqrt(3));
}

lib/Traveller/Mapper.pm  view on Meta::CPAN

                 "#eed5d2", "#e6e6fa", "#f0ffff", "#c5ffd5", "#e6ffe6", "#d5ffc5", "#f5f5dc");
  my $i = unpack("%32W*", lc $culture) % @colours; # checksum
  return $colours[$i];
}

sub background {
  my $self = shift;
  my $scale = 100;
  return join("\n", map {
    my $hex = $_;
    my $x = $hex->x;

lib/Traveller/Mapper.pm  view on Meta::CPAN

}

sub svg {
  my ($self, $width, $height) = @_;
  my $data = $self->header($width, $height);
  $data .= qq{  <g id='background'>\n};
  $data .= $self->background;
  $data .= qq{  </g>\n\n};
  $data .= qq{  <g id='comm'>\n};
  foreach my $hex (@{$self->hexes}) {
    $data .= $hex->comm_svg();
  }

 view release on metacpan or  search on metacpan

eg/public/css/error.css  view on Meta::CPAN

}

/* these are for the message boxes */

pre.content {
    background-color: #eee;
    color: #000;
    padding: 1em;
    margin: 0;
    border: 1px solid #aaa;
    border-top: 0;

eg/public/css/error.css  view on Meta::CPAN

}

div.title {
    font-family: "lucida console","monaco","andale mono","bitstream vera sans mono","consolas",monospace;
    font-size: 12px;
    background-color: #aaa;
    color: #444;
    font-weight: bold;
    padding: 3px;
    padding-left: 10px;
}

eg/public/css/error.css  view on Meta::CPAN

.errline {
    color: red;
}

pre.error {
    background: #334;
    color: #ccd;
    padding: 1em;
    border-top: 1px solid #000;
    border-left: 1px solid #000;
    border-right: 1px solid #eee;

 view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN

        --para2020, --para2020-rev

- **--theme**

    Option **--theme** is defined in default module, and choose given theme
    option according to the background color of the terminal. If you have
    next setting in your `~/.weekrc`:

        option --theme tokyo2020

    Option **--tokyo2020** is set for light terminal, and

 view release on metacpan or  search on metacpan

bin/zen  view on Meta::CPAN

  "--top-heading LEVEL"     => [\$opt_top_heading, 'Set top level section type: <part|chapter|section>'],
  "--document-class CLASS"  => [\$opt_document_class, 'Set latex document class'],
  "--verbose"           => [\$opt_verbose, 'More logging'],
  "--output FILENAME"          => [\$opt_output_file, 'Set output file'],
  "--port PORT:i"       => [\$opt_port, 'Start HTTP Server at port'],
  "--daemon"            => [\$opt_daemon, "Run server in background"],
  "--json-dump"         => [\$opt_json_dump, 'Dump the document'],
  "-x SECTION"          => [\$opt_exec, 'short for --exec'],
  "-o OUTPUTFILE"       => [\$opt_output_file, 'short for --output'],
  "-t SECTION"          => [\$opt_target, 'short for --target'],
  "-s SECTION"          => [\$opt_target, 'short for --section'],

bin/zen  view on Meta::CPAN

use Data::Dumper;

sub docgen_html {
 my $zf = shift;
 my $old = select(shift);
 print "<!DOCTYPE HTML>\n\n<html>\n<head>\n <meta charset=\"UTF-8\">\n <meta name=\"viewport\" content=\"width=device-width, initial-scale=1\">\n\n<link rel=\"stylesheet\" href=\"https://cdn.jsdelivr.net/gh/highlightjs/cdn-release\@10.7.3/build/style...
 print "<script>";
 print "window.zen = ";
 print JSON::encode_json({
   last_modified => $zf->{last_modified},
   size => $zf->{size},

bin/zen  view on Meta::CPAN

        return;
      }
    }
  
    print "HTTP/1.0 200 OK\r\n\r\n";
    print "<!doctype html>\n<html>\n  <head>\n    <meta charset=\"utf-8\">\n    <meta name=\"viewport\" content=\"width=device-width, initial-scale=1\">\n    <title>Index</title>\n    <style>\n      :root {\n        --navbar-height: 1.6rem;\n      }\...
    print "<div class=\"xxpad\"><h1>Index</h1>\n";
    print "<table>\n";
    print "<thead><tr class=\"sticky-top\"><th>Name</th><th>Size</th><th>Last Modified</th></tr></thead>\n";
    for (@contents) {
       my $timestr = strftime('%FT%TZ%z', localtime($_->{mtime}));

bin/zen  view on Meta::CPAN

  }
  }
  
  my $server = App::zen::WebServer->new($opt_port);
  if ($opt_daemon) {
    $server->background();
  } else {
    $server->run();
  }
  exit;
}

 view release on metacpan or  search on metacpan

lib/Appium.pm  view on Meta::CPAN

    return $self->_execute_command( $res, $params );
}


sub background_app {
    my ($self, $seconds) = @_;

    my $res = { command => 'background_app' };
    my $params = { seconds => $seconds};

    return $self->_execute_command( $res, $params );
}

lib/Appium.pm  view on Meta::CPAN

Search for elements in the current application, given an array of
selection criteria.

    $appium->complex_find( $selector );

=head2 background_app ( $time_in_seconds )

Defer the application to the background on the device for the
interval, given in seconds.

    $appium->background_app( 5 );

=head2 is_app_installed ( $bundle_id )

Check whether the application with the specified C<bundle_id> is
installed on the device.

 view release on metacpan or  search on metacpan

share/files/public/skins/default/bootstrap/css/bootstrap-responsive.min.css  view on Meta::CPAN

 * Copyright 2012 Twitter, Inc
 * Licensed under the Apache License v2.0
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Designed and built with all the love in the world @twitter by @mdo and @fat.
 */.clearfix{*zoom:1}.clearfix:before,.clearfix:after{display:table;line-height:0;content:""}.clearfix:after{clear:both}.hide-text{font:0/0 a;color:transparent;text-shadow:none;background-color:transparent;border:0}.input-block-level{display:block;wi...