view release on metacpan or  search on metacpan

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

if(exists $self->{feed_tag})
	{
	if	(
		$frame =~ s	{$self->{feed_tag}}
					{<a href="rss.xml">	 <img src="feed-icon-28x28.png"> </a>}xsm
		)
		{
		# replaced feed tag with feed
		}
	else

 view release on metacpan or  search on metacpan

README  view on Meta::CPAN

            # response body
            http://my-server.com> config pretty_printer JSON
            http://my-server.com> config pretty_printer Data::Dump
    
            # send the output to a file (the '>' must not be followed by any white-space!)
            http://my-server.com> GET /some-image.png >some-image.png

    Pretty-printing can be especially helpful for making XML or JSON
    response bodies more human-readable.

    When deserialize_response is set, if the content-type of the response

 view release on metacpan or  search on metacpan

bin/prima-repl  view on Meta::CPAN

=head2 Viewing Images

Prima makes opening and viewing images very easy, so I've added a function for
opening a tab to display an image. The function is C<open_image> and it requires
that you specify the filename of your image to open. For example, if you have an
image called C<test.png> in your current working directory, you could view it
with the following:

 > open_image 'test.png'

=head2 Plotting PDL Data

You can easily plot data with the various plotting commands if you have
L<PDL::Graphics::Prima> installed. This will create a new tab with your

 view release on metacpan or  search on metacpan

bin/img.pl  view on Meta::CPAN

    $ref->{ height }    = $q->param('height');
    my $process         = $q->param('process');
    my $metric          = $q->param('metric');
    
    my $rrd = App::ProcTrends::RRD->new( $ref );
    $rrd->gen_image( '/home/satoshi/test.png', 'cpu', 'firefox' );
}

 view release on metacpan or  search on metacpan

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

<pm:Desktop::Open>.

MARKDOWN
        },
        format => {
            schema => ['str*', in=>[qw/png html txt/]],
            default => 'png',
        },
        level => {
            summary => 'Error correction level',
            schema => ['str*', in=>['L', 'M', 'Q', 'H']],
            default => 'M',

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

};
sub gen_qrcode {
    require QRCode::Any;

    my %args = @_;
    my $format = $args{format} // 'png';

    my $filename = $args{filename};
    unless (defined $filename) {
        require File::Temp;
        (undef, $filename) = File::Temp::tempfile("qrcodeXXXXXXXXX", TMPDIR=>1, SUFFIX=>".$format");

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

=item * B<filename> => I<filename>

If unspecified, will save to a temporary filename and show it with
L<Desktop::Open>.

=item * B<format> => I<str> (default: "png")

(No description)

=item * B<level> => I<str> (default: "M")

 view release on metacpan or  search on metacpan

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

=head1 REPOSITORY

=begin html

<a href="http://travis-ci.org/bayashi/App-Randf"><img src="https://secure.travis-ci.org/bayashi/App-Randf.png?_t=1561223563"/></a> <a href="https://coveralls.io/r/bayashi/App-Randf"><img src="https://coveralls.io/repos/bayashi/App-Randf/badge.png?_t=...

=end html

App::Randf is hosted on github: L<http://github.com/bayashi/App-Randf>

 view release on metacpan or  search on metacpan

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

=for markdown
<img src="https://cdn.rawgit.com/benbernard/RecordStream/master/logos/logo-small.svg" align="right">

=for markdown
[![CPAN version](https://badge.fury.io/pl/App-RecordStream.png)](https://metacpan.org/release/App-RecordStream)
[![Build Status](https://travis-ci.org/benbernard/RecordStream.svg?branch=master)](https://travis-ci.org/benbernard/RecordStream)

=head1 NAME

App::RecordStream - recs - A system for command-line analysis of data

 view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN

    # setup redis-stat
    ln -s redis-top redis-stat

## ScreenShot

<img src="redis_top_screen.png" width="450px" />

## Usage

    Usage:
        redis-top [options]

 view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN

# ![UMI](https://github.com/z-eos/regather/raw/master/regather-logo.png) **REGATHER**

**regather** is a syncrepl consumer to generate ( *re gather* ) files on LDAP syncrepl events.

It uses Net::LDAP(3) to do all LDAP related stuff and Template(3) to generate files. Config file is processed with Config::Parser(3) (it's format described in Regather::Config(3)

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

t/dat/tree/ThreeThreeThree.txt
t/dat/tree/more.txt
t/dat/tree/go.xpm
t/dat/tree/ho.PNG
t/dat/tree/aaa.gif
t/dat/tree/no.png
t/dat/tree/ThreeThreeOnesey.txt
t/dat/tree/so.Png
t/dat/tree/subdir/dir/just_one.txt
t/dat/tree/subdir/nasty.txt
t/dat/tree/subdir/deepdir/groovy.txt

MANIFEST  view on Meta::CPAN

t/dat/tree3/AAA111/pixies/the_first.jpegged
t/dat/tree3/AAA111/pixies/the_first.GIF
t/dat/tree3/AAA111/pixies/the_first.JPG
t/dat/tree3/AAA111/pixies/the_first.XXX
t/dat/tree3/AAA111/pixies/the_first.jpg
t/dat/tree3/AAA111/pixies/the_first.png
t/dat/tree3/AAA111/pixies/the_first.txt
t/dat/tree3/AAA111/pixies/the_first_jpg
t/dat/tree3/AAA111/pixies/the_second.jpegged
t/dat/tree3/AAA111/pixies/the_third.GIF
t/dat/tree3/AAA111/pixies/the_third.JPG
t/dat/tree3/AAA111/pixies/the_third.XXX
t/dat/tree3/AAA111/pixies/the_third.jpg
t/dat/tree3/AAA111/pixies/the_third.png
t/dat/tree3/AAA111/pixies/the_third.txt
t/dat/tree3/AAA111/pixies/the_third_jpg
t/dat/tree3/AAA111/pixies/the_fifth.GIF
t/dat/tree3/AAA111/pixies/the_fifth.JPG
t/dat/tree3/AAA111/pixies/the_fifth.XXX
t/dat/tree3/AAA111/pixies/the_fifth.jpg
t/dat/tree3/AAA111/pixies/the_fifth.png
t/dat/tree3/AAA111/pixies/the_fifth.txt
t/dat/tree3/AAA111/pixies/the_fifth_jpg
t/dat/tree3/AAA111/pixies/the_fourth.GIF
t/dat/tree3/AAA111/pixies/the_fourth.JPG
t/dat/tree3/AAA111/pixies/the_fourth.XXX
t/dat/tree3/AAA111/pixies/the_fourth.jpg
t/dat/tree3/AAA111/pixies/the_fourth.png
t/dat/tree3/AAA111/pixies/the_fourth.txt
t/dat/tree3/AAA111/pixies/the_third.jpegged
t/dat/tree3/AAA111/pixies/the_fourth_jpg
t/dat/tree3/AAA111/pixies/the_sixth.GIF
t/dat/tree3/AAA111/pixies/the_sixth.JPG
t/dat/tree3/AAA111/pixies/the_sixth.XXX
t/dat/tree3/AAA111/pixies/the_sixth.jpg
t/dat/tree3/AAA111/pixies/the_sixth.png
t/dat/tree3/AAA111/pixies/the_sixth.txt
t/dat/tree3/AAA111/pixies/the_sixth_jpg
t/dat/tree3/AAA111/pixies/the_fourth.jpegged
t/dat/tree3/AAA111/pixies/the_second.GIF
t/dat/tree3/AAA111/pixies/the_second.JPG
t/dat/tree3/AAA111/pixies/the_second.XXX
t/dat/tree3/AAA111/pixies/the_second.jpg
t/dat/tree3/AAA111/pixies/the_second.png
t/dat/tree3/AAA111/pixies/the_second.txt
t/dat/tree3/AAA111/pixies/the_second_jpg
t/dat/tree3/BBB222/pyx/CVS/da_fifth.JPG
t/dat/tree3/BBB222/pyx/CVS/da_sixth.JPG
t/dat/tree3/BBB222/pyx/CVS/da_fourth.JPG

 view release on metacpan or  search on metacpan

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

=head1 DESCRIPTION

=begin html

<a href="https://asciinema.org/a/119109?autoplay=1" target="_blank"><img src="https://asciinema.org/a/119109.png" alto="usage" /></a>

=end html

App::RemoteCommand is a simple remote command launcher via ssh. The features are:

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

0.08: added -p option to refresh packages; removed Mojolicious::Plugin::Directory
0.06: CydiaIcon.png is copied to same directory as Packages.gz, used as repository icon in Cydia on iOS; Packages.gz now containFile Size and Filename fields
0.02: changed usage; repo now goes into backgroud by default
0.09: using system ar, until i fix perl ar setup

 view release on metacpan or  search on metacpan

README.mkdn  view on Meta::CPAN

[http://techblog.babyl.ca/entry/ringleader](http://techblog.babyl.ca/entry/ringleader) - The original blog entry

# AUTHOR

Yanick Champoux <yanick@babyl.dyndns.org> [![endorse](http://api.coderwall.com/yanick/endorsecount.png)](http://coderwall.com/yanick)

# COPYRIGHT AND LICENSE

This software is copyright (c) 2014 by Yanick Champoux.

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

Makefile.PL
README
README.md
bin/robobot
dist.ini
doc/_static/robobot-whoknows-sample.png
doc/common.defs
doc/conf.py
doc/config/index.rst
doc/cookbook/index.rst
doc/index.rst

 view release on metacpan or  search on metacpan

lib/App/SD/Server/View.pm  view on Meta::CPAN

template header => sub {
    my $self = shift;
    my $title = shift;
    outs_raw($self->page_nav->render_as_menubar) if ($self->page_nav);
        div{ class is 'logowrapper';
        img { src is '/static/sd/images/sd.png';
              alt is 'SD Logo',
              class is 'logo' 
              };
              };
    div { class is 'project-name';

 view release on metacpan or  search on metacpan

lib/App/SeismicUnixGui/configs/big_streams/Project_config.pm  view on Meta::CPAN

	#	  . $DATE_LINE_COMPONENT_STAGE_PROCESS . '/'
	#	  . $subUser;

	# PNG IMAGE STORAGE DIRECTORY
	my $PNG =
		$IMAGES_SEISMIC . '/' . 'png' . '/'
	  . $DATE_LINE_COMPONENT_STAGE_PROCESS . '/'
	  . $subUser;

	#	my $PNG_GPR =
	#		$IMAGES_GPR . '/' . 'png' . '/'
	#	  . $DATE_LINE_COMPONENT_STAGE_PROCESS . '/'
	#	  . $subUser;
	#
	#	my $PS_GPR =
	#		$IMAGES_GPR . '/' . 'ps' . '/'

lib/App/SeismicUnixGui/configs/big_streams/Project_config.pm  view on Meta::CPAN

	# GEOMAPS IMAGES DIRECTORY
	my $GEOMAPS_IMAGES_PNG =
		$GEOMAPS_IMAGES  . '/'
	  . $DATE_LINE_COMPONENT_STAGE_PROCESS
	  . '/png' . '/'
	  . $subUser;

	# GEOMAPS IMAGES DIRECTORY
	my $GEOMAPS_IMAGES_TIF =
		$GEOMAPS_IMAGES  . '/'

lib/App/SeismicUnixGui/configs/big_streams/Project_config.pm  view on Meta::CPAN

	#	  . $DATE_LINE_COMPONENT_STAGE_PROCESS . '/'
	#	  . $subUser;

	# PNG IMAGE STORAGE DIRECTORY
	my $PNG =
		$IMAGES_SEISMIC . '/png/'
	  . $DATE_LINE_COMPONENT_STAGE_PROCESS . '/'
	  . $subUser;

	#	my $PNG_GPR =
	#		$IMAGES_GPR . '/png/'
	#	  . $DATE_LINE_COMPONENT_STAGE_PROCESS . '/'
	#	  . $subUser;

	my $PNG_SEISMIC = $PNG;

lib/App/SeismicUnixGui/configs/big_streams/Project_config.pm  view on Meta::CPAN

	# GEOMAPS IMAGES DIRECTORY
	my $GEOMAPS_IMAGES_PNG =
		$GEOMAPS_IMAGES . '/'
	  . $DATE_LINE_COMPONENT_STAGE_PROCESS
	  . '/png' . '/'
	  . $subUser;

	# GEOMAPS IMAGES DIRECTORY
	my $GEOMAPS_IMAGES_TIF =
		$GEOMAPS_IMAGES . '/'

 view release on metacpan or  search on metacpan

lib/App/ShellCompleter/mpv.pm  view on Meta::CPAN

    'screenshot-jpeg-dpi=i' => _gcint(1,99999), #            Integer (1 to 99999) (default: 72)
    'screenshot-jpeg-optimize=i' => _gcint(0,100), #       Integer (0 to 100) (default: 100)
    'screenshot-jpeg-progressive!' => undef, #    Flag (default: no)
    'screenshot-jpeg-quality=i' => _gcint(0,100), #        Integer (0 to 100) (default: 90)
    'screenshot-jpeg-smooth=i' => _gcint(0,100), #         Integer (0 to 100) (default: 0)
    'screenshot-png-compression=i' => _gcint(0,9), #     Integer (0 to 9) (default: 7)
    'screenshot-png-filter=i' => _gcint(0,5), #          Integer (0 to 5) (default: 5)
    'screenshot-template=s' => undef, #            String (default: )
    'secondary-sid=s' => sub { #                  Choices: no auto (or an integer) (1 to 8190) (default: no)
        my %args = @_;
        my $word = $args{word};
        combine_answers(

 view release on metacpan or  search on metacpan

lib/App/SilverSplash/Apache2.pm  view on Meta::CPAN

            'amount'       => '0.05',
            'quantity'     => 1,
            'button_image' => CGI::image_button(
                -name => 'submit',
                -src =>
                  'http://s1.slwifi.com/images/buttons/3_hour_service.png',
                -alt => 'Make payments with PayPal',
            ),
        );

        $class->set( "paypal_id|$id" => "$mac|$ip" );

 view release on metacpan or  search on metacpan

lib/App/Sky/CmdLine.pm  view on Meta::CPAN

                target_dir: 'Files/files/code/'
            dirs:
                basename_re: '\\.(MYDIR)\\z'
                target_dir: 'Files/files/dirs/'
            images:
                basename_re: '\\.(?:bmp|gif|jpeg|jpg|kra|png|(?:ai|svg|xcf)(?:\\.bz2|\\.gz|\\.xz\\|\\.zst)?|svgz|webp)\\z'
                target_dir: 'Files/files/images/'
            music:
                basename_re: '\\.(?:aac|aup3|m4a|mod|mp3|ogg|s3m|wav|xm)\\z'
                target_dir: 'Files/files/music/mp3-ogg/'
            text:

 view release on metacpan or  search on metacpan

share/public/highlight/highlight.min.js  view on Meta::CPAN

end:"\\{",excludeEnd:!0,keywords:k,contains:[e.inherit(e.TITLE_MODE,{
className:"title.class",begin:/[A-Za-z$_][\u00C0-\u02B80-9A-Za-z$_]*/}),...B]
},H,J,{beginKeywords:"import",end:/$/,contains:[...v],relevance:0
},...B,..._,...M,I,P,...z,...q,U,V]}}})();hljs.registerLanguage("swift",e)})();/*! `perl` grammar compiled for Highlight.js 11.7.0 */
(()=>{var e=(()=>{"use strict";return e=>{
const n=e.regex,t=/[dualxmsipngr]{0,12}/,r={$pattern:/[\w.]+/,
keyword:"abs accept alarm and atan2 bind binmode bless break caller chdir chmod chomp chop chown chr chroot close closedir connect continue cos crypt dbmclose dbmopen defined delete die do dump each else elsif endgrent endhostent endnetent endprotoen...
},s={className:"subst",begin:"[$@]\\{",end:"\\}",keywords:r},i={begin:/->\{/,
end:/\}/},a={variants:[{begin:/\$\d/},{
begin:n.concat(/[$%@](\^\w\b|#\w+(::\w+)*|\{\w+\}|\w+(::\w*)*)/,"(?![A-Za-z])(?![@$%])")
},{begin:/[$%@][^\s\w{]/,relevance:0}]

 view release on metacpan or  search on metacpan

socialcalc/socialcalcserver.pl  view on Meta::CPAN

               $c->send_file_response("quitmessage.html");
               $c->close;
               undef($c);
               exit;
               }
            if ($uri =~ /\/([a-z\-0-9]+)\.(gif|js|css|png)(\?.*)*$/) { # ok request
               $uri = "$1.$2";
               $uri = "images/$uri" if ($2 eq "gif" || $2 eq "png");
#               if ($2 eq "js") {
#                  $res->content_type("text/html; charset=UTF-8");
#                  }
               $c->send_file_response($uri);
               next;

 view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN

  alt_code: n
  alt_user: n
  verbosity: INFO
  database:
    enabled: true
    path: /var/spamcupng/reports.db
Accounts:
  Yahoo!:
    e-mail: account@provider1.com.br
    password: FOOBAR
  Gmail:

README.md  view on Meta::CPAN

You probably noticed the following configuration lines from the YAML:

```YAML
  database:
    enabled: true
    path: /var/spamcupng/reports.db
```

Those lines define the configuration for a local database based on
[SQLite](https://sqlite.org/).

 view release on metacpan or  search on metacpan

lib/App/SpreadRevolutionaryDate/MsgMaker/Telechat.pm  view on Meta::CPAN

      $every_gender = $self->special_birthday_gender eq 'm' ? 'tous' : 'toutes';
  }

  my $msg = sprintf("Chalut ! Aujourd'hui, %s %d, c'est la %s-%s.\nBonne fête à %s les %s !", $day_name, $today->day, $feast_gender, $feast_singular, $every_gender, $feast_plural);

  my $img_path = dist_file('App-SpreadRevolutionaryDate', 'images/groucha.png');
  my $img_alt = "Grouchat de Téléchat : « $msg »";
  $img_alt =~ s/\n+/ /g;
  my $img = {path => $img_path, alt => $img_alt};

  return ($msg, $img);

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

lib/App/Standby/Service/Pingdom.pm
share/res/css/bootstrap-responsive.css
share/res/css/bootstrap-responsive.min.css
share/res/css/bootstrap.css
share/res/css/bootstrap.min.css
share/res/img/glyphicons-halflings-white.png
share/res/img/glyphicons-halflings.png
share/res/js/bootstrap.js
share/res/js/bootstrap.min.js
share/res/js/jquery-2.0.1.min.js
share/tpl/add_config.tpl
share/tpl/add_config_contacts.tpl

 view release on metacpan or  search on metacpan

lib/App/StaticImageGallery/Dir.pm  view on Meta::CPAN

                $args->{link_to_parent_dir} = 1;
                my $dir = App::StaticImageGallery::Dir->new(%$args);
                $dir->write_index;
            }
        }else{
            if ( $file->stringify =~ /.*(jpg|png|jpeg|tif)$/i ){
                $self->msg_verbose(10,"Push Image %s - %s",$self->work_dir,$file->basename);
                push @images, App::StaticImageGallery::Image->new(
                    dir      => $self,
                    original => $file->basename,
                    ctx      => $self->ctx,

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

t/output/mp3_purple_gz_cyan
t/output/pax_1
t/output/short_lines.txt
t/output/sun_tar
t/test.t
tarcolor_screenshot.png
tarcolor_screenshot_2.png

 view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN

# Tel: Login script for routers and other devices

[![Build Status](https://travis-ci.org/rfdrake/tel.svg?branch=master)](https://travis-ci.org/rfdrake/tel)
[![Coverage](https://coveralls.io/repos/rfdrake/tel/badge.png?branch=master)](https://coveralls.io/r/rfdrake/tel)
[![CPANTS kwalitee](http://cpants.cpanauthors.org/dist/App-Tel.png)](http://cpants.cpanauthors.org/dist/App-Tel)

# What it does

tel provides the following:
* Use a simple, single command to connect to multiple network device types.

README.md  view on Meta::CPAN

made progress on some things, but some have taken different directions.  Here
are the projects I know about:

1.  A comment in http://www.reddit.com/r/networking/comments/2bxehw/coloring_cli/ references a
    python expect implementation.  Here is a screenshot with some example code
    http://i.imgur.com/1slyPkK.png

2.  This thread gives a few ideas that I'll list below http://www.reddit.com/r/networking/comments/2hy2dj/cisco_cli_colorization/

3.  Cisco nx-os supports CLI coloring directly with "terminal color"

README.md  view on Meta::CPAN

Please let me know about bugs or feature requests via github.  Submit patches
when possible to fix or enhance something, or to improve the testing.

## Screenshots

![Cisco Show Cable Modem Phy](https://raw.githubusercontent.com/rfdrake/tel/screenshots/tel-scm.png)
![Cisco Show Interface](https://raw.githubusercontent.com/rfdrake/tel/screenshots/tel-shint.png)

## Namespace change from Expect::Tel to App::Tel

I decided to put it on CPAN with the "tel" name despite it being pretty
generic.  If you've been running the script a while you may have left over

 view release on metacpan or  search on metacpan

README.pod  view on Meta::CPAN

=pod

=begin html

<a href="https://travis-ci.org/ivanwills/App-TemplateCMD?branch=master"><img src="https://travis-ci.org/ivanwills/App-TemplateCMD.png?branch=master" alt="App-TemplateCMD"></a>
<a href="https://coveralls.io/r/ivanwills/App-TemplateCMD?branch=master"><img src="https://coveralls.io/repos/ivanwills/App-TemplateCMD/badge.svg?branch=master" alt="Coverage Status" /></a>

=end html

=head1 App-TemplateCMD

 view release on metacpan or  search on metacpan

lib/Templer/Plugin/FileGlob.pm  view on Meta::CPAN

                #
                # If the file is an image AND we have Image::Size
                # then populate the height/width too.
                #
                if ( $file =~ /\.(jpe?g|png|gif)$/i )
                {
                    my $module = "use Image::Size;";
                    ## no critic (Eval)
                    eval($module);
                    ## use critic