echo "$XXX" | perl -ne '/\/(\w+)[^\/]*?$/ and print $1'