Plan 9 from Bell Labs’s /usr/web/sources/contrib/anothy/bin/rc/cx
#!/bin/rc rfork e label $1 user=`{grep '^'$1' ' $home/lib/uname | sed 's/'$1' +([^@]+)@.+$/\1/'} host=`{grep '^'$1' ' $home/lib/uname | sed 's/'$1' +[^@]+@(.+)$/\1/'} shift ssh -r $user@$host $* awd #since plumbing cares