Mercurial > repo
view bin/welcome @ 11846:b915ab56eefc draft
<wob_jonas> `` set -e; c=bin/quine; >$c echo $\'#!/bin/sh\\necho $IRC_MESSAGE # Best cheating quine ever?\'; chmod -v a+x "$c"
| author | HackEso <hackeso@esolangs.org> |
|---|---|
| date | Tue, 16 Jul 2019 12:49:03 +0000 |
| parents | e037173e0012 |
| children | ef5ba4348bf2 |
line wrap: on
line source
#!/usr/bin/perl -w if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? welcome"; } else { exec "bin/?", "welcome"; }