view release on metacpan or search on metacpan
lib/App/Phoebe/Galleries.pm view on Meta::CPAN
$stream->write(encode_utf8 join("\n", grep /\S/, @{$image->{caption}}) . "\n") if $image->{caption};
gallery_print_link($stream, $host, "Thumbnail", "do/gallery/$dir/" . $image->{thumb}->[0]);
gallery_print_link($stream, $host, "Image", "do/gallery/$dir/" . $image->{img}->[0]);
}
return 1;
} elsif (my ($file, $extension) = $url =~ m!^gemini://$host(?::$port)?/do/gallery/([^/?]*/(?:thumbs|imgs)/[^/?]*\.(jpe?g|png))$!i) {
if (not -r "$galleries_dir/$file") {
$stream->write(encode_utf8 "40 Cannot read $file\r\n");
} else {
success($stream, $extension =~ /^png$/i ? "image/png" : "image/jpeg");
$log->info("Serving image $file");
$stream->write(read_binary("$galleries_dir/$file"));
}
return 1;
}
view all matches for this distribution
view release on metacpan or search on metacpan
This is Perl module B<App::plmetrics>.
=begin html
<a href="http://travis-ci.org/bayashi/App-plmetrics"><img src="https://secure.travis-ci.org/bayashi/App-plmetrics.png"/></a> <a href="https://coveralls.io/r/bayashi/App-plmetrics"><img src="https://coveralls.io/repos/bayashi/App-plmetrics/badge.png?b...
=end html
=head1 INSTALLATION
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/redis_traffic_stats.pm view on Meta::CPAN
=encoding utf-8
=begin html
<a href="https://travis-ci.org/hirose31/App-redis_traffic_stats"><img src="https://travis-ci.org/hirose31/App-redis_traffic_stats.png?branch=master" alt="Build Status" /></a>
<a href="https://coveralls.io/r/hirose31/App-redis_traffic_stats?branch=master"><img src="https://coveralls.io/repos/hirose31/App-redis_traffic_stats/badge.png?branch=master" alt="Coverage Status" /></a>
=end html
=head1 NAME
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/remarkpl/public/remark.min.js view on Meta::CPAN
}),e.COMMENT("#cs","#ce"),e.COMMENT("#comments-start","#comments-end")]},n={begin:"\\$[A-z0-9_]+"},i={className:"string",variants:[{begin:/"/,end:/"/,contains:[{begin:/""/,relevance:0}]},{begin:/'/,end:/'/,contains:[{begin:/''/,relevance:0}]}]},l={va...
beginKeywords:"class interface",end:/[{;=]/,illegal:/[^\s:]/,contains:[e.TITLE_MODE,e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_MODE]},{beginKeywords:"namespace",end:/[{;=]/,illegal:/[^\s:]/,contains:[e.inherit(e.TITLE_MODE,{begin:"[a-zA-Z](\\.?\\w)*"}),...
},a={className:"params",begin:/\(/,end:/\)/,excludeBegin:!0,excludeEnd:!0},r={className:"symbol",variants:[{begin:/\=[lgenxc]=/},{begin:/\$/}]},s={className:"comment",variants:[{begin:"'",end:"'"},{begin:'"',end:'"'}],illegal:"\\n",contains:[e.BACKSL...
},{begin:":\\s*"+t}]}]}}},{name:"hsp",create:function(e){return{case_insensitive:!0,lexemes:/[\w\._]+/,keywords:"goto gosub return break repeat loop continue wait await dim sdim foreach dimtype dup dupptr end stop newmod delmod mref run exgoto on mca...
},contains:[t,{className:"keyword",begin:"\\bend\\sif\\b"},{className:"function",beginKeywords:"function",end:"$",contains:[t,s,e.APOS_STRING_MODE,e.QUOTE_STRING_MODE,e.BINARY_NUMBER_MODE,e.C_NUMBER_MODE,r]},{className:"function",begin:"\\bend\\s+",e...
contains:[{className:"comment",begin:/\(\*/,end:/\*\)/},e.APOS_STRING_MODE,e.QUOTE_STRING_MODE,e.C_NUMBER_MODE,{begin:/\{/,end:/\}/,illegal:/:/}]}}},{name:"matlab",create:function(e){var t=[e.C_NUMBER_MODE,{className:"string",begin:"'",end:"'",contai...
illegal:"</",contains:[e.C_NUMBER_MODE,e.APOS_STRING_MODE,e.QUOTE_STRING_MODE,{className:"string",begin:"`",end:"`",contains:[e.BACKSLASH_ESCAPE]},{begin:"[\\$\\%\\@](\\^\\w\\b|#\\w+|[^\\s\\w{]|{\\w+}|\\w+)"},e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_M...
contains:[i]});return{aliases:["ps"],lexemes:/-?[A-z\.\-]+/,case_insensitive:!0,keywords:{keyword:"if else foreach return function do while until elseif begin for trap data dynamicparam end break throw param continue finally in switch exit filter try...
},{className:"meta",begin:"#\\!?\\[",end:"\\]",contains:[{className:"meta-string",begin:/"/,end:/"/}]},{className:"class",beginKeywords:"type",end:";",contains:[e.inherit(e.UNDERSCORE_TITLE_MODE,{endsParent:!0})],illegal:"\\S"},{className:"class",beg...
literal:"true false nil"},contains:[e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_MODE,e.NUMBER_MODE,a,t.preprocessor],illegal:/#/}}},{name:"sql",create:function(e){var t=e.COMMENT("--","$");return{case_insensitive:!0,illegal:/[<>{}*#]/,contains:[{beginKey...
return{aliases:["styl"],case_insensitive:!1,keywords:"if else for in",illegal:"("+o.join("|")+")",contains:[e.QUOTE_STRING_MODE,e.APOS_STRING_MODE,e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_MODE,a,{begin:"\\.[a-zA-Z][a-zA-Z0-9_-]*"+i,returnBegin:!0,cont...
built_in:"ip eip rip al ah bl bh cl ch dl dh sil dil bpl spl r8b r9b r10b r11b r12b r13b r14b r15b ax bx cx dx si di bp sp r8w r9w r10w r11w r12w r13w r14w r15w eax ebx ecx edx esi edi ebp esp eip r8d r9d r10d r11d r12d r13d r14d r15d rax rbx rcx rdx...
"atelier-lakeside-light":".hljs-atelier-lakeside-light .hljs-comment,.hljs-atelier-lakeside-light .hljs-quote{color:#5a7b8c}.hljs-atelier-lakeside-light .hljs-variable,.hljs-atelier-lakeside-light .hljs-template-variable,.hljs-atelier-lakeside-light ...
grayscale:".hljs-grayscale .hljs{display:block;overflow-x:auto;padding:.5em;color:#333;background:#fff}.hljs-grayscale .hljs-comment,.hljs-grayscale .hljs-quote{color:#777;font-style:italic}.hljs-grayscale .hljs-keyword,.hljs-grayscale .hljs-selector...
"solarized-dark":".hljs-solarized-dark .hljs{display:block;overflow-x:auto;padding:.5em;background:#002b36;color:#839496}.hljs-solarized-dark .hljs-comment,.hljs-solarized-dark .hljs-quote{color:#586e75}.hljs-solarized-dark .hljs-keyword,.hljs-solari...
containerLayout:'<div class="remark-notes-area">\n <div class="remark-top-area">\n <div class="remark-toolbar">\n <a class="remark-toolbar-link" href="#increase">+</a>\n <a class="remark-toolbar-link" href="#decrease">-</a>\n <span...
view all matches for this distribution
view release on metacpan or search on metacpan
bin/rename.PL view on Meta::CPAN
With the --command parameter you can make rename do other interesing
stuff like:
# make thumbnails in PNG format of all JPEG file
rename 's/\.jpg/-thumb.png/' -C 'convert {} -resize 120x120 {}' *.jpg
=head1 ENVIRONMENT
Two environment variables are used, B<SIMPLE_BACKUP_SUFFIX> and
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/resolvetable.pm view on Meta::CPAN
Sample screenshot 1:
=begin html
<img src="https://st.aticpan.org/source/PERLANCAR/App-resolvetable-0.008/share/images/Screenshot_20190530_111051.png" />
=end html
Sample screenshot 2 (with C<--timings>):
=begin html
<img src="https://st.aticpan.org/source/PERLANCAR/App-resolvetable-0.008/share/images/Screenshot_20190530_112052.png" />
=end html
Sample screenshot 3 (with C<--compare>):
=begin html
<img src="https://st.aticpan.org/source/PERLANCAR/App-resolvetable-0.008/share/images/Screenshot_20190820_235000-redacted.png" />
=end html
=head1 FUNCTIONS
view all matches for this distribution
view release on metacpan or search on metacpan
t/cli-builder.t
t/cli-html.t
t/cli-theme.t
t/cli.t
t/lib/Test.pm
t/onion.png
t/test.bmp
t/test.html.mt
t/test.md
share/revealjs/LICENSE
share/revealjs/README.md
share/revealjs/dist/theme/sky.css
share/revealjs/dist/theme/solarized.css
share/revealjs/dist/theme/white.css
share/revealjs/examples/assets/beeping.txt
share/revealjs/examples/assets/beeping.wav
share/revealjs/examples/assets/image1.png
share/revealjs/examples/assets/image2.png
share/revealjs/examples/auto-animate.html
share/revealjs/examples/backgrounds.html
share/revealjs/examples/barebones.html
share/revealjs/examples/layout-helpers.html
share/revealjs/examples/markdown.html
view all matches for this distribution
view release on metacpan or search on metacpan
'post-configure' => 'perl Makefile.PL',
'post-make' => 'make test'},
'terminus-font' => {switch => [qw|--x11dir=/share/fonts/X11/terminus|]},
x264 => {switch => [qw/--enable-static --enable-shared/]},
ffmpeg => {switch => [qw/--enable-gpl --enable-nonfree --enable-libass --enable-libfontconfig --enable-libfreetype --enable-libfribidi --enable-libx264 --enable-libx265 --enable-shared --enable-openssl/]},
libpng => {environment => {LIBS => '-lpthread'}},
wireshark => {switch => [qw/--with-gtk2 --enable-setuid-install --with-ssl/]},
qemu => {switch => [qw/--audio-drv-list=alsa/]},
qt5 => {'no-configure' => 1,
'post-configure' => './configure -prefix /lib/qt5 -release -opensource -confirm-license -nomake tests -nomake examples -no-dbus'},
mutt => {switch => [qw/--enable-hcache --with-ssl --enable-imap/]},
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/rsynccolor.pm view on Meta::CPAN
Sample screenshot:
=begin html
<img src="https://st.aticpan.org/source/PERLANCAR/App-rsynccolor-0.007/share/images/Screenshot_20190506_181519.png" />
=end html
=for Pod::Coverage ^(.+)$
view all matches for this distribution
view release on metacpan or search on metacpan
------------------------
* Improved browser behavior of the `back` button.
* Fixed incorrect thumbnail stretch for certain image ratios.
* Fixed empty thumbnail list in old browsers without `devicePixelRatio`.
* Fixed incorrect usage of `pngcrush`, resulting in stray PNG output files.
* Gallery generation speedup with parallelism/multi-core support (`-j`).
* Can use `p7zip` when installed for faster compression.
* Perl dependency on `Date::Parse` removed.
* Minor/cosmetic improvements.
view all matches for this distribution
view release on metacpan or search on metacpan
[](https://travis-ci.org/dex4er/soapcli)
# NAME
App::soapcli - SOAP client for CLI with YAML and JSON input and output
view all matches for this distribution
view release on metacpan or search on metacpan
$if =~ s{/\._([^/]+)$}{/$1} && -s $if and $s = 0;
$s and $s > 100;
}
# convert can't deal with .ico files (yet)
# Tk can deal with Tiff/NEF as of 804.027_501 with Tk::TIFF
grep m/\.(jpe?g|gif|x[pb]m|png|bmp|tiff?|nef)$/i => readdir IDIR;
closedir IDIR;
$Option{thumbsortorder} =~ m/^(?:desc|reverse)/ and @img = reverse @img;
#my $t0 = [ gettimeofday ];
my $earlyopennextdir = $Option{lastfirstnext} || $opt_1;
view all matches for this distribution
view release on metacpan or search on metacpan
$ tmblr -v video.mp4
Post a bunch of images as drafts:
$ tmblr -s draft *.png
Write a text post from your editor:
$ tmblr
view all matches for this distribution
view release on metacpan or search on metacpan
=pod
=for HTML <a href="https://travis-ci.org/mdom/txtnix"><img src="https://travis-ci.org/mdom/txtnix.svg?branch=master"></a>
=for HTML <a href='https://coveralls.io/r/mdom/txtnix?branch=master'><img src='https://coveralls.io/repos/mdom/txtnix/badge.png?branch=master' alt='Coverage Status' /></a>
=head1 NAME
txtnix - Client for twtxt, the minimalist microblogging service for hackers
view all matches for this distribution
view release on metacpan or search on metacpan
=pod
=begin html
<a href="https://travis-ci.org/ivanwills/App-used"><img src="https://travis-ci.org/ivanwills/App-used.png" alt="App-used"></a>
=head1 App-used
Installs the script C<used> which tells you what modules have been C<used> or
C<required> or C<extend>ed (Moose) or L<Catalyst> plugins used by files in
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/vl.pm view on Meta::CPAN
=head1 REPOSITORY
=begin html
<a href="http://travis-ci.org/bayashi/App-vl"><img src="https://secure.travis-ci.org/bayashi/App-vl.png"/></a> <a href="https://coveralls.io/r/bayashi/App-vl"><img src="https://coveralls.io/repos/bayashi/App-vl/badge.png?branch=master"/></a>
=end html
App::vl is hosted on github: L<http://github.com/bayashi/App-vl>
view all matches for this distribution
view release on metacpan or search on metacpan
=begin markdown
# STATUS
[](https://travis-ci.org/nichtich/wdq)
[](https://coveralls.io/r/nichtich/App-wdq)
[](http://cpants.cpanauthors.org/dist/App-wdq)
=end markdown
=head1 SYNOPSIS
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/wmiirc/Screenshot.pm view on Meta::CPAN
with 'App::wmiirc::Role::Action';
sub _screenshot {
my($window) = @_;
system sprintf config("commands", "screenshot",
'import -window %s ~/$(date +screenshot-%%Y-%%m-%%d-%%H-%%M-%%S.png)'),
$window;
}
sub action_screenshot {
_screenshot("root");
view all matches for this distribution
view release on metacpan or search on metacpan
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},
dbg("running: $cmd");
system($cmd);
}
my $relpath = "gen/" . basename($output_file);
if ($output_file =~ m/\.(jpg|png)$/) {
print "<figure>";
print "<img src=\"$relpath\">";
print "</figure>\n";
} elsif ($output_file =~ m/\.(svg)$/) {
my $content = read_file($output_file);
html => 'text/html',
css => 'text/css',
js => 'text/javascript',
json => 'application/json',
svg => 'image/svg+xml',
png => 'image/png',
jpeg => 'image/jpeg',
jpg => 'image/jpeg',
gif => 'image/gif',
txt => 'text/plain',
);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Applications/BackupAndRestore.pm view on Meta::CPAN
=head3 Figure 1-1. Backup & Restore
=begin html
<img src="BackupAndRestore/pod/BackupAndRestore.png"><br>
=end html
=head1
lib/Applications/BackupAndRestore.pm view on Meta::CPAN
=head3 Figure 1-2. Backup In Progress Notification
=begin html
<img src="BackupAndRestore/pod/BackupInProgressNotification.png"><br>
=end html
=head2 Restore Dialog
lib/Applications/BackupAndRestore.pm view on Meta::CPAN
=head3 Figure 1-3. Restore Dialog
=begin html
<img src="BackupAndRestore/pod/RestoreDialog.png"><br>
=end html
=head2 Restore In Progress Notification
lib/Applications/BackupAndRestore.pm view on Meta::CPAN
=head3 Figure 1-4. Restore In Progress Notification
=begin html
<img src="BackupAndRestore/pod/RestoreInProgressNotification.png"><br>
=end html
=head2 Remove Backup Dialog
lib/Applications/BackupAndRestore.pm view on Meta::CPAN
=head3 Figure 1-5. Remove Backup Dialog
=begin html
<img src="BackupAndRestore/pod/RemoveBackupDialog.png"><br>
=end html
=head1 Perl
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AproJo.pm view on Meta::CPAN
AproJo - A time recording application based on Mojolicious
=begin html
<a href='https://travis-ci.org/wollmers/AproJo'><img src='https://travis-ci.org/wollmers/AproJo.png' alt="AproJo" /></a>
<a href='https://coveralls.io/r/wollmers/AproJo?branch=master'><img src='https://coveralls.io/repos/wollmers/AproJo/badge.png?branch=master' alt='Coverage Status' /></a>
<a href='http://cpants.cpanauthors.org/dist/AproJo'><img src='http://cpants.cpanauthors.org/dist/AproJo.png' alt='Kwalitee Score' /></a>
<a href='http://badge.fury.io/pl/AproJo'><img src='https://badge.fury.io/pl/AproJo.svg' alt='CPAN version' height='18' /></a>
=end html
=head1 SYNOPSIS
lib/AproJo.pm view on Meta::CPAN
Helmut Wollmersdorfer, E<lt>helmut.wollmersdorfer@gmail.comE<gt>
=begin html
<a href='http://cpants.cpanauthors.org/author/wollmers'><img src='http://cpants.cpanauthors.org/author/wollmers.png' alt='Kwalitee Score' /></a>
=end html
=head1 COPYRIGHT AND LICENSE
view all matches for this distribution
view release on metacpan or search on metacpan
share/root/favicon.ico
share/root/html5shiv.min.js
share/root/ie10-viewport-bug-workaround.js
share/root/index.html
share/root/jquery-1.11.1.min.js
share/root/jquery-ui-1.11.1/images/ui-bg_diagonals-thick_18_b81900_40x40.png
share/root/jquery-ui-1.11.1/images/ui-bg_diagonals-thick_20_666666_40x40.png
share/root/jquery-ui-1.11.1/images/ui-bg_flat_10_000000_40x100.png
share/root/jquery-ui-1.11.1/images/ui-bg_glass_100_f6f6f6_1x400.png
share/root/jquery-ui-1.11.1/images/ui-bg_glass_100_fdf5ce_1x400.png
share/root/jquery-ui-1.11.1/images/ui-bg_glass_65_ffffff_1x400.png
share/root/jquery-ui-1.11.1/images/ui-bg_gloss-wave_35_f6a828_500x100.png
share/root/jquery-ui-1.11.1/images/ui-bg_highlight-soft_100_eeeeee_1x100.png
share/root/jquery-ui-1.11.1/images/ui-bg_highlight-soft_75_ffe45c_1x100.png
share/root/jquery-ui-1.11.1/images/ui-icons_222222_256x240.png
share/root/jquery-ui-1.11.1/images/ui-icons_228ef1_256x240.png
share/root/jquery-ui-1.11.1/images/ui-icons_ef8c08_256x240.png
share/root/jquery-ui-1.11.1/images/ui-icons_ffd27a_256x240.png
share/root/jquery-ui-1.11.1/images/ui-icons_ffffff_256x240.png
share/root/jquery-ui-1.11.1/jquery-ui.min.css
share/root/jquery-ui-1.11.1/jquery-ui.min.js
share/root/jquery-ui-1.11.1/jquery-ui.structure.min.css
share/root/jquery-ui-1.11.1/jquery-ui.theme.min.css
share/root/jquery.shapeshift.2.0.min.js
view all matches for this distribution
view release on metacpan or search on metacpan
# Archive::Ar [](http://travis-ci.org/jbazik/Archive-Ar)
Interface for manipulating ar archives.
New generation for manipulating large archives.
## INSTALL
view all matches for this distribution
view release on metacpan or search on metacpan
# Archive::Ar [](http://travis-ci.org/jbazik/Archive-Ar)
Interface for manipulating ar archives
## INSTALL
view all matches for this distribution
view release on metacpan or search on metacpan
],
"cookies": [],
"content": {
"size": 213057,
"mimeType": "text/html",
"text": "<!doctype html><html itemscope=\"\" itemtype=\"http://schema.org/WebPage\" lang=\"en-AU\"><head><meta content=\"/images/branding/googleg/1x/googleg_standard_color_128dp.png\" itemprop=\"image\"><link href=\"/images/branding/produ...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": -1,
"_transferSize": 68060
{
"startedDateTime": "2017-04-17T00:00:31.687Z",
"time": 2.7260000001660956,
"request": {
"method": "GET",
"url": "https://www.google.com.au/images/branding/googlelogo/2x/googlelogo_color_120x44dp.png",
"httpVersion": "unknown",
"headers": [
{
"name": "Referer",
"value": "https://www.google.com.au/"
"name": "server",
"value": "sffe"
},
{
"name": "content-type",
"value": "image/png"
},
{
"name": "status",
"value": "200"
},
}
],
"cookies": [],
"content": {
"size": 5087,
"mimeType": "image/png",
"text": "iVBORw0KGgoAAAANSUhEUgAAAPAAAABYCAYAAADLGnoRAAATpklEQVR42uxdCXRU1Rm+FgbBKopLsYpr3UoVlZkJkWInbyaJaDm2iuCOnlbB5ShHPVq3GiUzSZAjIuICVlrABRGX0oqYRHGltgooamVRUCuQyQRIZt4AITHT/zt4ig0v77/vzZ2XCbnfOffMMJnl8e797r//V2hoaGhoaGjsiSgry/woMiF1S...
"encoding": "base64"
},
"redirectURL": "",
"headersSize": -1,
],
"cookies": [],
"content": {
"size": 436180,
"mimeType": "text/javascript",
"text": "/* _GlobalPrefix_ */\n/* _Module_:quantum */\ntry{\nvar s_,s_aaa=\"function\"==typeof Object.defineProperties?Object.defineProperty:function(a,b,c){if(c.get||c.set)throw new TypeError(\"ES3 does not support getters and setters.\"...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": 0,
"_transferSize": 0
{
"startedDateTime": "2017-04-17T00:00:31.692Z",
"time": 1.5830000002097222,
"request": {
"method": "GET",
"url": "https://www.google.com.au/images/branding/googlelogo/1x/googlelogo_color_272x92dp.png",
"httpVersion": "unknown",
"headers": [
{
"name": "Referer",
"value": "https://www.google.com.au/"
"name": "server",
"value": "sffe"
},
{
"name": "content-type",
"value": "image/png"
},
{
"name": "status",
"value": "200"
},
}
],
"cookies": [],
"content": {
"size": 5969,
"mimeType": "image/png",
"text": "iVBORw0KGgoAAAANSUhEUgAAARAAAABcCAYAAACm5+q2AAAXGElEQVR4Ae1dC5QcVZm+OtOBwC6CwiqCCBIQkAWSqpqEkNhdt3uyQeJBgSi4uwoIihtchJgF5TGarpoJicACCkFANuGBBhcQH5DMJAH0CCjIQ1hYfBAeZPoRkklVdR6ZZHrvt+a4pLdn5r/Vdbuqh/udc0/nMdPTZ+rWV//9/+//fhYHZnat2...
"encoding": "base64"
},
"redirectURL": "",
"headersSize": -1,
{
"startedDateTime": "2017-04-17T00:00:31.698Z",
"time": 1.7859999998108833,
"request": {
"method": "GET",
"url": "https://ssl.gstatic.com/gb/images/i1_1967ca6a.png",
"httpVersion": "unknown",
"headers": [
{
"name": "Referer",
"value": "https://www.google.com.au/"
"name": "vary",
"value": "Origin"
},
{
"name": "content-type",
"value": "image/png"
},
{
"name": "status",
"value": "200"
},
}
],
"cookies": [],
"content": {
"size": 7325,
"mimeType": "image/png",
"text": "iVBORw0KGgoAAAANSUhEUgAAAhAAAABECAYAAADQgAxBAAAcZElEQVR4Ae3dB2wbV57H8RFFSYxsS5StRGed7Uy8K2VtxQ7tOPW8WXrT45xX8G3x4Rqvty28kuB6iEV6ZZqdrWZ67pSia2n2HYjgeuX1nuXVrdgwbXeNLe++D/gLeBg8jIbjGZEi3x/4YDxv3qPLlvnpvZlHz5UrV71TN9xww8+3wRNtj3Mcx...
"encoding": "base64"
},
"redirectURL": "",
"headersSize": -1,
],
"cookies": [],
"content": {
"size": 108222,
"mimeType": "text/javascript",
"text": "/* _GlobalPrefix_ */\n/* _Module_:sy1p */\ntry{\nvar s_vja,s_wja,s_1i,s_xja,s_2i,s_yja={};s_D(\"sy1p\");var s_3i=function(a){s_K(this,a,0,2,null,null)};s_g(s_3i,s_J);s_3i.prototype.jh=function(){return s_L(this,1)};var s_zja={};v...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": -1,
"_transferSize": 36140
{
"startedDateTime": "2017-04-17T00:00:32.028Z",
"time": 0.9629999999560823,
"request": {
"method": "GET",
"url": "https://www.google.com/textinputassistant/tia.png",
"httpVersion": "unknown",
"headers": [
{
"name": "Referer",
"value": "https://www.google.com.au/"
"name": "age",
"value": "338226"
},
{
"name": "content-type",
"value": "image/png"
},
{
"name": "status",
"value": "200"
},
}
],
"cookies": [],
"content": {
"size": 258,
"mimeType": "image/png",
"text": "iVBORw0KGgoAAAANSUhEUgAAABsAAAAXCAIAAAB1dKN5AAAAyUlEQVR4AWP4////buoBoGkMQOon9QDQNNqYOGrixdvPSiZtjG1aA0fxLevwI3wmrj94pXDilsKJmzC15fZtQeZGNayGIyAXp4lLdp4vm7r9Pxg0zduLjwEDQBOTWlajm/gOBsgz0ad4PtwELCYmt60DaiAeEWUi2G7CzsTnxscwQLaJcBPQT...
"encoding": "base64"
},
"redirectURL": "",
"headersSize": -1,
],
"cookies": [],
"content": {
"size": 136732,
"mimeType": "text/javascript",
"text": "/* _GlobalPrefix_ */\nthis.gbar_=this.gbar_||{};(function(_){var window=this;\n/* _Module_:syp */\ntry{\nvar On=function(){};_.y(On,Error);_.Pn=function(){this.b=\"pending\";this.B=[];this.w=this.C=void 0};_.ae(_.Pn);var Qn=funct...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": 0,
"_transferSize": 0
{
"startedDateTime": "2017-04-17T00:00:32.250Z",
"time": 1.3269999999465654,
"request": {
"method": "GET",
"url": "https://www.google.com.au/images/nav_logo242.png",
"httpVersion": "unknown",
"headers": [
{
"name": "Referer",
"value": "https://www.google.com.au/"
"name": "server",
"value": "sffe"
},
{
"name": "content-type",
"value": "image/png"
},
{
"name": "status",
"value": "200"
},
}
],
"cookies": [],
"content": {
"size": 16786,
"mimeType": "image/png",
"text": "iVBORw0KGgoAAAANSUhEUgAAAKcAAAGaCAYAAABqhVMrAABBWUlEQVR4AeybBXDqaBeGT7e67u7uVkivrEASrq67u7u7sFOg8ru7u/u/Rtfd3d2BOoErFbLvmQ53vpwJ2kKv0Jmnhp+8OR5anr6OC9pNeru1p96RWqhHrOP1SPLoQCh5oNkxvCGgVYsa0/4G5n8702xErFP9keSdIG1EUnYOXoVg7zDC6S0B1...
"encoding": "base64"
},
"redirectURL": "",
"headersSize": -1,
view all matches for this distribution
view release on metacpan or search on metacpan
t/pod.t
t/Rgss3a.t
t/Rgssad.t
t/sample/Data/Scripts.rvdata
t/sample/Dummy
t/sample/Graphics/System/1x1.png
view all matches for this distribution
view release on metacpan or search on metacpan
-filetypes => [
[ 'Text Document', [ '*.txt' ] ],
[ 'Perl File', [ '*.pl', '*.pm', ] ],
[ 'JPEG Image', [ '*.jpeg', '*.jpg', '*.jpe' ] ],
[ 'GIF Image', [ '*.gif', ] ],
[ 'PNG Image', [ '*.png', ] ],
[ 'BMP Image', [ '*.bmp', ] ],
[ 'All Files', '*.*' ],
],
-initialdir => '.',
-title => 'Extract File...',
-image => $image,
)->pack (-padx => 5, -pady => 5);
$show->Show;
}
elsif ($file =~ /\.png$/i) {
my $bin = $tyd->readFile ($file);
my $base = encode_base64 ($bin);
my $image = $main->Photo (-data => $base, -format => 'PNG');
view all matches for this distribution