view bin/spam @ 11999:64fb792e12e8 draft

<wib_jonas> `` perl -pi -e \'s/^(url\\(1hackeso\\) -) .*/$1 print URL for a file in the hackenv hg repository and web access of the repository/; print\' share/whatis
author HackEso <hackeso@esolangs.org>
date Mon, 04 Nov 2019 12:20:27 +0000
parents 86254e96a14f
children 405c0e846fcc
line wrap: on
line source

line="${1-$(cat /hackenv/tmp/spline)}"; len="$(awk 'END{print NR}' /hackenv/tmp/spout)"; echo -n "$line/$len:"; sed -n "${line}{p;q}" /hackenv/tmp/spout; echo "$((line<len?line+1:1))" > /hackenv/tmp/spline