in reply to Accessing executing SQL with Perl DBI & Oracle?

Doh!!
It appears that my SQL is wrong.
All I needed to do was change my SQL to this ...
select distinct o.sql_text "SQL text" ,s.username "User name" ,s.schemaname "Schema name" ,s.lockwait "Lock wait" ,s.status "Status" ,s.sid "Session ID" ,s.serial# "Serial N" ,s.server "Server" ,s.osuser "OS user" ,s.machine "Machine" ,s.terminal "Terminal" ,s.program "Program" from sys.v_$session s ,sys.v_$sql o where s.username is not null and s.sql_address=o.address(+)
which I found in this link
Ain't the internet great!