find . -type f -print0|perl -mMIME::Base64 -n0e 's%^..%%;tr%\-_%+/%;$_=MIME::Base64::decode_base64($_);s%&[^&]+$%%;m%&as_categ_id=([0-9]+)&as_order_id=([A-Z_]+)%;print "queue get \"$_\" -o \"$2/$1.xml\"
";' | sort -u > ~/urls.txt