annotate bin/gaseen @ 11973:c47f90df9112 draft

<b_jonas> `` perl -pi -e \'/(bf\\(1egobot\\))/ and $_ = "$1 - evaluate brainfuck snippet\\n"\' share/whatis
author HackEso <hackeso@esolangs.org>
date Mon, 21 Oct 2019 21:52:10 +0000
parents 7b39af120554
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1695
7b39af120554 <c00kiemon5ter> mv bin/nseen bin/gaseen
HackBot
parents:
diff changeset
1 #!/bin/bash
7b39af120554 <c00kiemon5ter> mv bin/nseen bin/gaseen
HackBot
parents:
diff changeset
2 who="${1% }" who="${who,,}"
7b39af120554 <c00kiemon5ter> mv bin/nseen bin/gaseen
HackBot
parents:
diff changeset
3 arr=(/var/irclogs/_esoteric/????-??-??.txt)
7b39af120554 <c00kiemon5ter> mv bin/nseen bin/gaseen
HackBot
parents:
diff changeset
4 gawk -vw="$who" -vOFS=":" '
7b39af120554 <c00kiemon5ter> mv bin/nseen bin/gaseen
HackBot
parents:
diff changeset
5 tolower($2) ~ w{x=$0} ENDFILE{if(x){print substr(FILENAME,1,10), x; exit}}
7b39af120554 <c00kiemon5ter> mv bin/nseen bin/gaseen
HackBot
parents:
diff changeset
6 ' < <(for ((i=${#arr[@]}-1; i>=0; i-- )); do echo ${arr[i]}; done)
7b39af120554 <c00kiemon5ter> mv bin/nseen bin/gaseen
HackBot
parents:
diff changeset
7