Ivan Bessarabov bessarabov

## gist:3c864ffeeda4be0cc455
#!/usr/bin/perl

=encoding UTF-8
=cut

=head1 DESCRIPTION

=cut

# common modules

## gist:9318850
vagrant@tmp:~/DancerTestProblem$ prove -l
t/croak.t .. 1/?
#   Failed test ''
#   at t/croak.t line 12.
#                   '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
#         "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
# <html>
# <head>
# <title>Runtime Error</title>
# <link rel="stylesheet" href="/css/error.css" />

## gist:9318862
vagrant@tmp:~/DancerTestProblem$ prove -l
t/croak.t .. 1/?
#   Failed test ''
#   at t/croak.t line 12.
#                   'GLOB(0x25b0758)'
#     doesn't match '(?^:done)'
# Looks like you failed 1 test of 1.
t/croak.t .. Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/1 subtests

## gist:9472903
bessarabov@lol:~/Dropbox/git/App-Comparator$ time perl -Ilib bin/comparator
Name                                Releas- ▼ Latest     Latest  #    pass   fail  na   un-
PAUSE::Permissions                  NEILB   2013-12-06   0.07    7    506    3     6    0
Module::Locate                      NEILB   2013-12-16   1.78    16   554    0     0    0
Net::Dict                           NEILB   2013-12-23   2.13    18   351    7     0    0
Template::Plugin::HTTP::UserAgent   NEILB   2013-12-29   0.06    6    311    0     8    0
Constant::FromGlobal                NEILB   2014-01-07   0.05    5    493    0     0    0
Lingua::EN::Numbers                 NEILB   2014-01-12   1.06    8    460    0     0    0
HTML::Summary                       NEILB   2014-01-19   0.019   9    317    0     0    0
Apache::OneTimeURL                  NEILB   2014-01-22   1.32    6    0      0     0    0

## gist:9472911
bessarabov@lol:~/Dropbox/git/App-Comparator$ time perl -Ilib bin/comparator
Name                Releaser    ▼ Latest     Latest    #     pass   fail  na   unkn-
Maypole             TEEJAY      2008-04-18   2.13      33    350    25    1    128
Gantry              TKEEFER     2010-01-13   3.64      23    411    29    1    2
Jifty               SARTAK      2011-05-18   1.10518   30    67     72    3    14
CGI::Application    MARKSTOS    2011-06-16   4.50      44    3536   2     0    4
CGI::Prototype      MERLYN      2011-07-30   0.9054    6     571    0     0    1
OX                  DOY         2013-08-15   0.13      13    231    0     5    0
CGI::Snapp          RSAVAGE     2013-08-29   1.08      9     520    1     2    0
Cot                 YSHIBATA    2013-09-26   0.11      11    237    0     0    0

## gist:9741647
#!/usr/bin/perl

=begin comment

Это pre-commit hook. Этот скрипт запускается перед тем как как открывается
$EDITOR для ввода commit message.

Если этот скрипт завершвется с exit status != 0, то комит не происходит.

Можно запустить `git commit --no-verify` и тогда этот хук не будет выполнятся.

## gist:11252419
#!/usr/bin/perl

use strict;
use warnings FATAL => 'all';
use utf8;
use open qw(:std :utf8);

use Test::More;
use POSIX;

## gist:ff4ed04debe9a46890c0
#!/usr/bin/perl

use strict;
use warnings FATAL => 'all';
use feature 'say';
use utf8;
use open qw(:std :utf8);

use DDP;
use Carp;

## gist:f62fbf4e0ccc1912738b
#!/usr/bin/env perl

use strict;
use warnings FATAL => 'all';
use feature 'say';
use utf8;
use open qw(:std :utf8);

use Data::Printer;
use ElasticSearch;

## gist:fa4f651837dc2200e076
{
  "query": {
    "match_all": {

    }
  },
  "filter": {
    "term": {
      "distribution": "Test-Whitespaces"
    }
	#!/usr/bin/perl

	=encoding UTF-8
	=cut

	=head1 DESCRIPTION

	=cut

	# common modules
	vagrant@tmp:~/DancerTestProblem$ prove -l
	t/croak.t .. 1/?
	# Failed test ''
	# at t/croak.t line 12.
	# '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
	# "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
	# <html>
	# <head>
	# <title>Runtime Error</title>
	# <link rel="stylesheet" href="/css/error.css" />
	bessarabov@lol:~/Dropbox/git/App-Comparator$ time perl -Ilib bin/comparator
	Name Releas- ▼ Latest Latest # pass fail na un-
	PAUSE::Permissions NEILB 2013-12-06 0.07 7 506 3 6 0
	Module::Locate NEILB 2013-12-16 1.78 16 554 0 0 0
	Net::Dict NEILB 2013-12-23 2.13 18 351 7 0 0
	Template::Plugin::HTTP::UserAgent NEILB 2013-12-29 0.06 6 311 0 8 0
	Constant::FromGlobal NEILB 2014-01-07 0.05 5 493 0 0 0
	Lingua::EN::Numbers NEILB 2014-01-12 1.06 8 460 0 0 0
	HTML::Summary NEILB 2014-01-19 0.019 9 317 0 0 0
	Apache::OneTimeURL NEILB 2014-01-22 1.32 6 0 0 0 0
	bessarabov@lol:~/Dropbox/git/App-Comparator$ time perl -Ilib bin/comparator
	Name Releaser ▼ Latest Latest # pass fail na unkn-
	Maypole TEEJAY 2008-04-18 2.13 33 350 25 1 128
	Gantry TKEEFER 2010-01-13 3.64 23 411 29 1 2
	Jifty SARTAK 2011-05-18 1.10518 30 67 72 3 14
	CGI::Application MARKSTOS 2011-06-16 4.50 44 3536 2 0 4
	CGI::Prototype MERLYN 2011-07-30 0.9054 6 571 0 0 1
	OX DOY 2013-08-15 0.13 13 231 0 5 0
	CGI::Snapp RSAVAGE 2013-08-29 1.08 9 520 1 2 0
	Cot YSHIBATA 2013-09-26 0.11 11 237 0 0 0
	#!/usr/bin/perl

	=begin comment

	Это pre-commit hook. Этот скрипт запускается перед тем как как открывается
	$EDITOR для ввода commit message.

	Если этот скрипт завершвется с exit status != 0, то комит не происходит.

	Можно запустить `git commit --no-verify` и тогда этот хук не будет выполнятся.
	#!/usr/bin/perl

	use strict;
	use warnings FATAL => 'all';
	use utf8;
	use open qw(:std :utf8);

	use Test::More;
	use POSIX;
	#!/usr/bin/env perl

	use strict;
	use warnings FATAL => 'all';
	use feature 'say';
	use utf8;
	use open qw(:std :utf8);

	use Data::Printer;
	use ElasticSearch;
	{
	"query": {
	"match_all": {

	}
	},
	"filter": {
	"term": {
	"distribution": "Test-Whitespaces"
	}