Skip to content

Instantly share code, notes, and snippets.

View ykarikos's full-sized avatar
🏡
Working from home

Yrjö Kari-Koskinen ykarikos

🏡
Working from home
33 followers · 16 following
  • Digitaalinen asuntokauppa DIAS
  • Helsinki
  • X @ykarikos
View GitHub Profile
@ykarikos
ykarikos / gist:f1e6e208789e300f7adc
Created May 30, 2015 18:59
Talvikin numeroharjoittelu
(use '[clojure.java.shell :only [sh]])
(defn say [& args] (apply sh "say" args))
(defn say-and-print [n]
(let [n-str (str n)]
(println n-str)
(Thread/sleep 2000)
(say n-str)))
@ykarikos
ykarikos / keybase.md
Created June 10, 2015 20:51

Keybase proof

I hereby claim:

  • I am ykarikos on github.
  • I am ykk (https://keybase.io/ykk) on keybase.
  • I have a public key whose fingerprint is 2E71 56C3 7760 E735 B175 E053 0E4E A201 3B3A BE42

To claim this, I am signing this object:

@ykarikos
ykarikos / gist:0d5cfa0d0ee467808810
Created September 17, 2015 10:16
Check that NS record match in all zone name servers
MASTER=a.iana-servers.net.; DOMAIN=example.com.; dig +short -t NS $DOMAIN @$MASTER |sort >/tmp/$MASTER; for h in `cat /tmp/$MASTER`; do echo - Querying $h:; dig +short -t NS $DOMAIN @$h |sort |diff /tmp/$MASTER -; done
@ykarikos
ykarikos / map.clj
Created January 3, 2016 15:04
Accessing a map
user=> (def mymap {:foo 1 :bar {:subfirst 1.2 :subsecond "foo"}})
#'user/mymap
user=> (:foo mymap)
1
user=> (mymap :bar)
{:subfirst 1.2, :subsecond "foo"}
user=> (-> mymap :bar :subsecond)
"foo"
@ykarikos
ykarikos / simp_le-howto.md
Last active February 18, 2018 01:13
Howto start using Letsencrypt with simp_le

Howto start using Letsencrypt with simp_le

What I had:

What I wanted:

  • A Letsencrypt certificate for Apache, Postfix and Dovecot
  • Simple tool for managing certificates that does need root privileges
  • Automatic renewal
@ykarikos
ykarikos / germany.md
Created January 6, 2017 23:21
Living in Germany

Living in Germany

Here's some remarks I've made while living in Munich, Germany (vs. in Finland). I made a similar list in 2004 in Austria.

Here we go.

Money

  • It's very customary to not be able to pay with a credit card. One needs to carry always cash. Sometimes just the local debit cards are valid, like in Ikea o_O

Traffic

@ykarikos
ykarikos / denglisch.md
Last active March 30, 2017 16:25
Denglisch words I hear while living and working in Germany

Denglisch words I hear while living and working in Germany

  • gefixed
  • gemerged
  • gerebased
  • gedownloaded
  • terminieren: either to terminate (to kill) or to agree on an appointment (Termin)
  • gerebranded
  • reviewen, "Ich hab' einige gereviewed"
  • beim merge
  • gecherry-picked
@ykarikos
ykarikos / excercise.js
Created May 5, 2017 07:05
What does each logging statement print, why?
// What does each logging statement print, why?
var x = 1;
console.log(x);
if(1) {
var x = 2;
console.log(x);
}
console.log(x);
@ykarikos
ykarikos / renameVideo.pl
Created January 28, 2018 11:47
Rename video files with a ISO date prefix
#!/usr/bin/perl -w
# Rename video files with a ISO date prefix, e.g.
# rename from P12345.MOV to 2018-01-30.P12345.MOV
# Tested with MTS, 3GP and MOV files.
#
# (c) 2018 Yrjö Kari-Koskinen <ykk@peruna.fi>
# Licensed with the MIT License
use Image::ExifTool qw(:Public);
@ykarikos
ykarikos / create-spinning-gif.sh
Last active March 28, 2018 10:58
Create spinning and rotating gif with GraphicsMagick
mkdir spin
for angle in `seq 360 30 690`; do gm convert original.jpg -background "#FFFFFF" -rotate $angle -crop 512x512+0+0 spin/$angle.png; done
cd spin
gm convert *.png -loop 0 -delay 20 spinningfoobar.gif