@$_=(1)x@@for@@=-<>..0;${$y+=/D/-/U/}[$x+=/R/-/L/]=0for$/=\1,<>;print"@$_
"for@@