annotate bin/sledp @ 11485:4118a635d290 draft

<oerjan> sled bin/sledp//s,; echo ,; echo -n ,
author HackEso <hackeso@esolangs.org>
date Thu, 12 Apr 2018 04:06:13 +0100
parents 656bf2e6b793
children bbb91a3e7d49
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11485
4118a635d290 <oerjan> sled bin/sledp//s,; echo ,; echo -n ,
HackEso <hackeso@esolangs.org>
parents: 11484
diff changeset
1 [[ "$1" == ?*//* ]] || { echo 'usage: sled file//script'; exit 1; }; key="${1%%//*}"; value="${1#*//}"; [[ -f "$key" ]] || { echo 'Rosebud!'; exit 1; }; echo -n "$key//"; sed "$value" "$key" ;