view bin/paste @ 11973:c47f90df9112 draft

<b_jonas> `` perl -pi -e \'/(bf\\(1egobot\\))/ and $_ = "$1 - evaluate brainfuck snippet\\n"\' share/whatis
author HackEso <hackeso@esolangs.org>
date Mon, 21 Oct 2019 21:52:10 +0000
parents 916b38c83c3b
children 0d78afb61c51
line wrap: on
line source

#!/bin/bash
if [ "$1" ] && url "$1" 2>/dev/null # Save making a file when it already exists.
then
    true
else
    PASTENUM="$RANDOM"

    mkdir -p $HACKENV/tmp/paste

    url tmp/paste/paste."$PASTENUM"
    cat -- "${1--}" > $HACKENV/tmp/paste/paste."$PASTENUM"
fi