#!/bin/sh -e
DST=${DST:-nc paster.example.com 2020}
if [ -s "$1" ]; then
    src="$1"
    bn="${1##*/}"
    _ext="${bn##*.}"
    [ "$bn" = "$_ext" ] || ext="1:e${#_ext}:$_ext"
else
    src=`mktemp`
    trap "rm -f $src" HUP PIPE INT QUIT TERM EXIT
    cat > $src
    [ $# -eq 0 ] || ext="1:e${#1}:$1"
fi
size=`perl -e 'print -s $ARGV[0]' $src`
( echo -n "d${ext}1:v${size}:" ; cat $src ; echo -n e ) | $DST