lsof4orcl

pgrep oracle | perl -lne 'print qq(strings /proc/$_/cmdline; ls -l /proc/$_/fd)' | sh | less