Mercurial > repo
changeset 11487:bbb91a3e7d49 draft
<oerjan> mkx bin/sledp//sled "$1" "--"
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Thu, 12 Apr 2018 04:21:26 +0100 |
parents | 1e6e3a07b5f4 |
children | cbd86e77f7c2 |
files | bin/sledp |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/bin/sledp Thu Apr 12 04:20:07 2018 +0100 +++ b/bin/sledp Thu Apr 12 04:21:26 2018 +0100 @@ -1,1 +1,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" ; +sled "$1" "--"