This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use Net::UPnP::ControlPoint; | |
use WWW::Mechanize; | |
sub sonos_discover { | |
my @hosts; | |
my $cp = Net::UPnP::ControlPoint->new(); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package main | |
import ( | |
"fmt" | |
"os" | |
"os/signal" | |
"syscall" | |
"time" | |
yaml "gopkg.in/yaml.v2" |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
0452a51fe0fe68af85e58ecba228639ca5486fb782171e23079c5e674035ba5c1a706798d5f07e201f8a7acc876edbc7fe437a3d4ac05931d996addf04485be01a;c-darwin |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# unwarp, rescale & rename GoPro pics using 4 CPUs | |
find /Volumes/NO\ NAME/DCIM/ -type f -regex '.*/G[0-9]+.JPG' | | |
sort | | |
perl -MPOSIX=strftime -lne 'printf qq(convert "%s" -filter Lanczos -distort barrel "0.06335 -0.18432 -0.13009" -resize 1440x1080 -font Courier -pointsize 32 -draw "gravity southeast fill white text 0,0 \\\"%s\\\"" -quality 100 tl%05d.jpg\0), $_, strftime("%Y-%m-%d %H:%M", localtime [stat($_)]->[9]), ++$i' | | |
xargs -0 -n1 -P4 sh -c | |
# build timelapse at 60 fps | |
ffmpeg -f image2 -framerate 60 -i tl%05d.jpg -s 1440x1080 -pix_fmt yuv420p timelapse.mp4 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh | |
wifienable() { | |
lipc-set-prop com.lab126.wifid enable 1 | |
} | |
wifidisable() { | |
lipc-set-prop com.lab126.wifid enable 0 | |
} |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <iostream> | |
#include <set> | |
#include <math.h> | |
int n_divisors(int n) { | |
int l = sqrt(n); | |
std::set<int> f; | |
f.insert(n); | |
for (int i = 1; i <= l; i++) | |
if (n % i == 0) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <iostream> | |
#include <math.h> | |
int main() { | |
int w = 6; | |
int l = pow(10, w - 1); | |
int t = pow(10, w); | |
int h = t - 1; | |
for (long i = h; i > l; i--) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
bash-3.2$ cd rainbarf/ | |
bash-3.2$ prove -v | |
t/00-compile.t .................. | |
ok 1 - compiles | |
1..1 | |
ok | |
t/01-tmux.t ..................... | |
ok 1 - pipe 1 | |
ok 2 - pattern 1 | |
ok 3 - pipe 2 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; EmacsMac.app | |
(setq-default dotspacemacs-configuration-layers '(osx | |
git | |
version-control)) | |
; Setup font & colors | |
;(setq-default dotspacemacs-default-font '("Source Code Pro" | |
; :size 13 | |
; :weight normal | |
; :width normal |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
# The IP for the server you wish to ping (8.8.8.8 is a public Google DNS server) | |
SERVER=8.8.8.8 | |
# Only send two pings, sending output to /dev/null | |
ping -c2 ${SERVER} > /dev/null | |
# If the return code from ping ($?) is not 0 (meaning there was an error) | |
if [ $? != 0 ] |