Plan 9 from Bell Labs’s /usr/web/sources/contrib/anothy/bin/rc/tagclock
#!/bin/rc cd /mnt/acme/^$winid clockfmt='%H:%M' while () { oldtag=`{cat tag} newtag=`{echo $oldtag | sed 's/[^\|]+\|[ 0-9:]+\|//'} echo cleartag > ctl datefmt ' '$clockfmt' |' > tag echo $newtag > tag sleep 14 }