abh

package CPAN::Testers::API::ReportNNTP;
use Moose;
use Email::Simple;
use IO::Uncompress::AnyInflate qw(anyinflate $AnyInflateError);

has zarticle => (
    isa      => 'Str',
    is       => 'ro',
    required => 1,
);

abh

[ask@dhcp225 ~]$ /opt/local/bin/mongod --dbpath /tmp/data --cpu --noauth
Thu Oct 15 15:25:58 Mongo DB : starting : pid = 10349 port = 27017 dbpath = /tmp/data master = 0 slave = 0  64-bit 
Thu Oct 15 15:25:58 db version v1.0.0, pdfile version 4.4
Thu Oct 15 15:25:58 git version: nogitversion
Thu Oct 15 15:25:58 sys info: Darwin embla.bn.dev 10.0.0 Darwin Kernel Version 10.0.0: Fri Jul 31 22:47:34 PDT 2009; root:xnu-1456.1.25~1/RELEASE_I386 i386
Thu Oct 15 15:25:58 waiting for connections on port 27017
Thu Oct 15 15:25:58 web admin interface listening on port 28017
Thu Oct 15 15:26:02 cpu: 3999	0	0%
Thu Oct 15 15:26:04 connection accepted from 127.0.0.1:15050 #1
Thu Oct 15 15:26:04 bad recv() len: 1233190746

abh

t/database.t .... 1/11 
#   Failed test 'no collections'
#   at t/database.t line 17.
#          got: '3'
#     expected: '0'
got database at t/database.t line 18.

#   Failed test 'test, system.indexes, and test.$_id_'
#   at t/database.t line 29.
#          got: '5'

abh

#!/usr/bin/env perl
use strict;
use warnings;

use Test::More;

use V6::User;
#use V6::User::Identity;
use V6::DB;

abh

package V6::User;
use Moose;
use namespace::clean -except => 'meta';

1;

__END__

abh

#0  0x00000032c6a0d6bb in write () from /lib64/libpthread.so.0
#1  0x0000003b6f4782c7 in ?? () from /lib64/libcrypto.so.6
#2  0x0000003b6f47665e in BIO_write () from /lib64/libcrypto.so.6
#3  0x0000003b6f02019d in ssl3_write_pending () from /lib64/libssl.so.6
#4  0x0000003b6f020798 in ssl3_write_bytes () from /lib64/libssl.so.6
#5  0x0000000000433619 in eventer_SSL_rw (op=<value optimized out>, fd=16, buffer=0xffffffffffffffe0, len=20, 
    mask=0x484bb078, closure=0xf76e7a5) at eventer_SSL_fd_opset.c:416
#6  0x0000000000423285 in __safe_Ewrite (e=0xf775f40, b=0x484bb020, l=20, mask=0x484bb078) at noit_jlog_listener.c:93
#7  0x000000000042344d in noit_jlog_thread_main (e_vptr=<value optimized out>) at noit_jlog_listener.c:121
#8  0x00000032c6a06617 in start_thread () from /lib64/libpthread.so.0

abh

{
       "query" : {
          "filtered" : {
             "filter" : {
                "terms" : {
                   "active" : [
                      1
                   ],
                   "onsite" : [
                      "no",

abh

sub find_similar {
    my ($self, $job, %args) = @_;

    my $size = $args{size} || 5;

    $args{offsite} //= ($job->onsite || '') eq 'no' ? 1 : 0;

    my $like_text = join " ", map { $job->$_ } $job->editable_fields;

    return $self->find(%args,

abh

#!/usr/bin/env perl
use strict;
use warnings;
use local::lib;

use lib '/Users/ask/src/Plack/lib';

use Plack;
use Plack::Builder;
use HTTP::Exception;

abh

diff --git a/t/hello.mhtml b/t/hello.mhtml
index f36c488..02c01f6 100644
--- a/t/hello.mhtml
+++ b/t/hello.mhtml
@@ -2,3 +2,8 @@
 Hello World <% $var %>
 <% do { join ",", $r->params } %>
 
+<%perl>
+   if ($ARGS{403}) {