Skip to content

Instantly share code, notes, and snippets.

{
"timed_out": false,
"hits": {
"hits": [
{
"_source": {
"date": "2013-06-16T14:07:39",
"user": "faLMeoWDRjSethSZIGNB_A",
"id": "gGJV8tp5UIiyCmYS_kGcaWn9jJU",
"author": "BESSARABV",
{
"query": {
"match_all": {
}
},
"filter": {
"term": {
"user": "faLMeoWDRjSethSZIGNB_A"
}
{
"timed_out" : false,
"hits" : {
"hits" : [
{
"_source" : {
"profile" : [
{
"name" : "github",
"id" : "doherty"
use Ubic::Service::SimpleDaemon;
my $service = Ubic::Service::SimpleDaemon->new(
bin => "/tmp/service.pl",
stdout => "/var/log/rubus/ubic.save.stdout.log",
stderr => "/var/log/rubus/ubic.save.stderr.log",
ubic_log => "/var/log/rubus/ubic.save.log",
user => "www-data",
#!/usr/bin/perl
use strict;
use warnings FATAL => 'all';
ddd();
__END__
This script dies
#!/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;
use strict;
use warnings FATAL => 'all';
use Test::More;
use qbit;
pass('Loaded ok');
# left argument is less than right argument -1
bessarabov@lol:~/Dropbox/tmp$ ./get_pauseid_distibutions.pl BESSARABV > import
bessarabov@lol:~/Dropbox/tmp$ cat import
namespace,name,source
perl,App::IsGitSynced,https://github.com/bessarabov/App-IsGitSynced.git
perl,Weightbot::API,https://github.com/bessarabov/Weightbot-API.git
perl,Dist::Zilla::PluginBundle::BESSARABV,https://github.com/bessarabov/Dist-Zilla-PluginBundle-BESSARABV.git
perl,Trac::RPC,https://github.com/bessarabov/Trac-RPC.git
perl,Akado::Account,https://github.com/bessarabov/Akado-Account.git
perl,App::D,https://github.com/bessarabov/App-D.git
perl,SQL::Easy,https://github.com/bessarabov/SQL-Easy.git
#!/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;