set echo off
set termout off
set feedback off
set heading off
set pagesize 0
set linesize 250
set trimspool on
set verify off

spool lobs.sql

select 'alter table ' || l.owner || '.' || l.table_name ||
       ' modify lob (' || l.column_name || ') (shrink space cascade); -- ' ||
       round(s.bytes / 1024 / 1024, 2) || ' MB'
from dba_lobs l
join dba_segments s
  on s.tablespace_name = l.tablespace_name
 and s.owner = l.owner
 and s.segment_type = 'LOBSEGMENT'
where l.owner = 'SYS'
  and l.tablespace_name = 'SYSAUX'
  and l.table_name like 'WR%'
order by s.bytes
/

spool off
set termout on