Skip to content

Instantly share code, notes, and snippets.

View perigrin's full-sized avatar

Chris Prather perigrin

View GitHub Profile
#!/bin/bash -x
A=one
B=two
C=3
D=4
if [[ "$B $C $D" =~ $A ]]
then
echo $A
fi

Keybase proof

I hereby claim:

  • I am perigrin on github.
  • I am perigrin (https://keybase.io/perigrin) on keybase.
  • I have a public key ASDFQrQ_0w5fdUolTpGkdjYdcPKqFH15QUhiNKNXsTSNlQo

To claim this, I am signing this object:

PRIVACY STATEMENT

SECTION 1 - WHAT DO WE DO WITH YOUR INFORMATION?

When you register for our site, we collect the personal information you give us such as your name, address and email address.

When you browse our site, we also automatically receive your computer’s internet protocol (IP) address in order to provide us with information that helps us learn about your browser and operating system.

Email marketing: With your permission, we may send you emails about our site, new products and other updates.

10:06 -!- dcg_ [[email protected]] has joined #magnet-srb
10:07 dcg_: perigrin: ether: hi
10:09 dcg_: Are you the correct people to approach about permission to connect a bridge from a matrix Home Server to irc.perl.org
10:09 dcg_: If you are not familiar with matrix mor information can be found at matrix.org
10:12 dcg_: Currently I'm involved with a perl based project http://ledgersmb.org and we have moved from using clients directly connected to #ledgersmb@freenode to matrix clients (riot.im mainly) for development and support discussion.
10:13 dcg_: As we are now looking to add dancer to our application we would like to bridge at least #dancer to a matrix room as well.
10:17 perigrin: sungo would be the one to talk to. im at breakfast currently can I get back to you in a bit?
10:18 perigrin: if it operates as a bot you dont need permission, if you need server level interconnect we will have to take it to the network opers
10:18 dcg_: Perigrin hi.
10:19 dcg_: Basically it wo
@perigrin
perigrin / -
Created October 19, 2016 17:25
[perigrin@eakins dbd-mysql-test]$ which mysqld
which: no mysqld in (/usr/local/sbin:/usr/local/bin:/usr/bin:/usr/bin/site_perl:/usr/bin/vendor_perl:/usr/bin/core_perl)
[perigrin@eakins dbd-mysql-test]$ carton install
Installing modules using /home/perigrin/dbd-mysql-test/cpanfile
Successfully installed DBI-1.636
Successfully installed DBD-mysql-4.037
2 distributions installed
Complete! Modules were installed into /home/perigrin/dbd-mysql-test/local
[perigrin@eakins dbd-mysql-test]$
Eligo Recruitment|92
BlueGlue|34
Orleston Associates Ltd.|34
Open Select Recruitment | www.osrecruit.com|33
Pro-Quest Resourcing Ltd|32
Orleston Associates|27
Confidential|23
Ascent Sourcing|21
TEKsystems|21
Booking.com|19
@perigrin
perigrin / -
Created September 12, 2016 16:30
[11:27:24][sqlite-ify]
~/dev/Perl_Companies$ carton exec perl -MDateTime -E'say DateTime->now()->delta_days(DateTime->new(year => 2012))->in_units("months")'
0
[11:27:29][sqlite-ify]
~/dev/Perl_Companies$ carton exec perl -MDateTime -E'say DateTime->now()->delta_days(DateTime->new(year => 2012))->in_units("days")'
1716
@perigrin
perigrin / -
Created September 12, 2016 16:29
[11:27:24][sqlite-ify]
~/dev/Perl_Companies$ carton exec perl -MDateTime -E'say DateTime->now()->delta_days(DateTime->new(year => 2012))->in_units("months")'
0
[11:27:29][sqlite-ify]
~/dev/Perl_Companies$ carton exec perl -MDateTime -E'say DateTime->now()->delta_days(DateTime->new(year => 2012))->in_units("days")'
Running Mkbootstrap for Coro::State ()
chmod 644 "State.bs"
"/usr/bin/perl" "/usr/share/perl5/core_perl/ExtUtils/xsubpp" -typemap "/usr/share/perl5/core_perl/ExtUtils/typemap" -typemap "typemap" State.xs > State.xsc && mv State.xsc State.c
Warning: Aliases 'is_zombie' and 'is_destroyed' have identical values in State.xs, line 3852
cc -c -D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -march=x86-64 -mtune=generic -O2 -pipe -fstack-protector-strong -DVERSION=\"6.511\" -DXS_VERSION=\"6.511\" -fPIC "-I/usr/lib/perl5/core_perl/CORE" -DCORO_ASM -DCORO_STACKSIZE=16384 -DCORO_GUARDPAGES=4 -DCORO_JIT=1 State.c
In file included from /usr/lib/perl5/core_perl/CORE/perl.h:5554:0,
from State.xs:12:
State.xs: In function ‘runops_trace’:
State.xs:1415:91: error: ‘struct block_sub’ has no member named ‘argarray’; did you mean ‘savearray’?
PUSHs (CxHASARGS (cx) ? sv_2mortal (
# OZNOID, SIR! I hope this doesn't overstep my
# bounds, I just needed to be able to modify the
# ignore list. :]
# NO PROBLEM, EL MASQUEO