#!/bin/sh

cut=$(echo "$@" | perl -nle 'print y!/!!-4')

#     --accept '.mp3,.ogg,.jpg,.gif,.png,.pdf,.tex,.dvi,.mid,.ttf' \
wget --recursive \
     --level=inf \
     --no-parent \
     --follow-tags=a \
     --reject '.html,[NMSD]=[DA]' \
     --force-directories \
     --no-host-directories \
     --cut-dirs=$cut \
     --continue \
     --wait=1 \
     --random-wait \
     "$@"