Skip to content

Instantly share code, notes, and snippets.

View perigrin's full-sized avatar

Chris Prather perigrin

View GitHub Profile
root@ford:~# traceroute 67.205.137.242
traceroute to 67.205.137.242 (67.205.137.242), 30 hops max, 60 byte packets
1 router2-dal.linode.com (67.18.7.162) 0.916 ms 1.013 ms 1.000 ms
2 173.255.207.16 (173.255.207.16) 0.711 ms 0.940 ms 173.255.207.12 (173.255.207.12) 0.686 ms
3 173.255.207.8 (173.255.207.8) 0.826 ms 0.804 ms 0.823 ms
4 dls-b21-link.telia.net (62.115.120.84) 2.113 ms dls-b21-link.telia.net (62.115.137.106) 0.960 ms nyk-bb4-link.telia.net (62.115.120.174) 46.166 ms
5 nyk-bb4-link.telia.net (213.155.130.208) 46.276 ms dls-b21-link.telia.net (62.115.120.88) 1.982 ms dls-b21-link.telia.net (62.115.140.9) 1.264 ms
6 * nyk-bb1-link.telia.net (213.155.130.64) 45.092 ms nyk-b2-link.telia.net (62.115.137.101) 45.803 ms
7 nyk-b2-link.telia.net (62.115.137.99) 45.878 ms * nyk-b2-link.telia.net (62.115.137.101) 46.192 ms
8 * * *
SSH_BIN=`which ssh`
alias machine_list="cat ~/.ssh/config | egrep '^Host' | grep -v '\*' | cut -d ' ' -f 2"
# Setup SSH aliases
for MACHINE in `machine_list`
do
alias $MACHINE="TERM=xterm-256color $SSH_BIN $MACHINE"
done
#!/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_ [~sbts@ppp174-218.static.internode.on.net] 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")'