Mercurial > repo
view paste/paste.5734 @ 8001:faebf4569ba3
<b_jonas> `` echo $\'#!/bin/sh\\nexec perl -e\\\'\'\'open$I,"<","share/mtg/allsets.txt"or die$!;$/=""; @c=grep{/(?i:$ARGV[0])/}<$I>; print $c[rand($c)];\'\\\'\' "$1"\' > bin/random-card && chmod -v a+x bin/random-card
author | HackBot |
---|---|
date | Mon, 09 May 2016 08:32:52 +0000 |
parents | 6568d45e3294 |
children |
line wrap: on
line source
#!/bin/bash if [ ! "$1" ] then PASTE=- else PASTE="$1" fi PASTENUM="$RANDOM" mkdir -p $HACKENV/paste echo 'http://codu.org/projects/hackbot/fshg/index.cgi/raw-file/tip/paste/paste.'"$PASTENUM" cat "$PASTE" > $HACKENV/paste/paste."$PASTENUM"