Skip to content

Instantly share code, notes, and snippets.

View creaktive's full-sized avatar
👽
🛸

Stanislaw Pusep creaktive

👽
🛸
View GitHub Profile
@jamiew
jamiew / google_twunter_lol
Created July 28, 2011 20:34
All the dirty words from Google's "what do you love" project: http://www.wdyl.com/
easterEgg.BadWorder.list={
"4r5e":1,
"5h1t":1,
"5hit":1,
a55:1,
anal:1,
anus:1,
ar5e:1,
arrse:1,
arse:1,
@avar
avar / 30-income-calculon.pl
Last active August 15, 2024 15:13
Calculate your income in The Netherlands with and without a 30% ruling.
# To check if this is up-to-date with the tax rates go to
# http://www.expatax.nl/tax-rates-2016.php and see if there's anything
# newer there.
#
# I make no guarantees that any of this is correct. I calculated this
# at the time and have been updating it when new tax rates come along
# because people keep finding this useful.
#
# There's also an interactive JS version of this created by
# @stevermeister at
@syohex
syohex / lis.pl
Created November 16, 2011 09:14
Simple Scheme interpreter in Perl(inspired by lis.py http://norvig.com/lispy.html)
#!perl
use strict;
use warnings;
package Lispl;
use Scalar::Util qw(blessed looks_like_number);
use List::Util qw(reduce);
my $global_env;
@lestrrat
lestrrat / aetail.pl
Created January 25, 2012 01:31
tail -f with AnyEvent (is this correct?)
use strict;
use AnyEvent;
use Fcntl qw(SEEK_SET);
use Linux::Inotify2;
main(@ARGV);
sub main {
my $file = shift or die "no file specified";
@creaktive
creaktive / cpan-tested.pl
Last active September 30, 2015 03:18
cpan-outdated | cpan-tested | cpanm
#!/usr/bin/env perl
use 5.008;
use strict;
use utf8;
use warnings qw(all);
use CPAN::DistnameInfo;
use Carp qw(carp croak);
use Config;
use File::Spec::Functions;
@cscorley
cscorley / TerminusBold-Powerline.ttf
Created February 6, 2012 00:01
Terminus (TTF) for Powerline
@tobin
tobin / extrapolation_demo.m
Created May 31, 2012 14:15
Linear predictive extrapolation
% This code answers the question at http://dsp.stackexchange.com/a/110/64
N = 150; % Order of LPC auto-regressive model
P = 500; % Number of samples in the extrapolated time series
M = 150; % Point at which to start predicting
t = 1:P;
x = 5*sin(t/3.7+.3)+3*sin(t/1.3+.1)+2*sin(t/34.7+.7); %This is the measured signal
@MohamedAlaa
MohamedAlaa / tmux-cheatsheet.markdown
Last active August 4, 2025 14:30
tmux shortcuts & cheatsheet

tmux shortcuts & cheatsheet

start new:

tmux

start new with session name:

tmux new -s myname
@creaktive
creaktive / deps.sh
Created August 10, 2012 19:27
Ubuntu + Catalyst
sudo apt-get install curl git libpq-dev libssl-dev
curl -kL http://install.perlbrew.pl | bash
echo "source ~/perl5/perlbrew/etc/bashrc" >> ~/.bash_profile
source ~/.bash_profile
perlbrew install perl-5.16.2
perlbrew switch perl-5.16.2
perlbrew install-cpanm
@johntyree
johntyree / getBlockLists.sh
Last active June 4, 2025 15:24
Make one large blocklist from the bluetack lists on iblocklist.com
#!/usr/bin/env sh
# Download lists, unpack and filter, write to stdout
curl -s https://www.iblocklist.com/lists.php \
| sed -n "s/.*value='\(http:.*=bt_.*\)'.*/\1/p" \
| xargs wget -O - \
| gunzip \
| egrep -v '^#'