in reply to regular expression for workdir
$path =~ m|$magic_word/([^/]+/[^/]+)/|; print "$1\n"; [download]