Mercurial > repo
view bin/wercome @ 7757:99c5e6af1e66
<fizzie> ` echo -e \'#! bin/bash\\ncmd="$1"\\nshift\\nf="$*"\\nif [ -z "$f" ]; then f="${cmd#* }"; cmd="${cmd%% *}"; fi\\nif [ -z "$f" ]; then echo try: \\\\`f command filename; else "$cmd" "$(< "$f")"; fi\' > bin/f
author | HackBot |
---|---|
date | Wed, 04 May 2016 21:33:42 +0000 |
parents | 6eb1b867a767 |
children | d056743e5c13 |
line wrap: on
line source
#!/usr/bin/perl -w if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? wercome"; } else { exec "bin/?", "wercome"; }