view bin/bf @ 11329:dd6d2180c5b6

<wob_jonas> perl -e open$h,"<",($f="wisdom/font");local$/;$_=<$h>; s"& \\S+/twitter\\.com/\\S+""; if (1) { open $o,">",$f;print$o $_; } print substr $_,200;
author HackBot
date Wed, 17 Jan 2018 21:02:27 +0000
parents c989a1669243
children
line wrap: on
line source

#! /bin/bash
[[ $# > 0 ]] || { echo "Run what?"; exit 1; }
ci="$1"
echo -n "${ci#*!}" | { /hackenv/interps/egobf/src/egobfi8 <(echo -n "${ci%%!*}") ; }