Query to get create dba directory statements of dba directories present in the database

Query to get create dba directory statements of dba directories present in the database

set pages 200
set linesize 200
SELECT 'create or replace directory '
       || directory_name
       || ' as '''
       || directory_path
       || ''';'
FROM   dba_directories;  

Output of the above query will be similar to below.

'CREATEORREPLACEDIRECTORY'||DIRECTORY_NAME||'AS'''||DIRECTORY_PATH||''';'
----------------------------------------------------------------------------------------------------
create or replace directory ORACLE_DBA_AR as '';

create or replace directory ORACLE_DBA_ARENA as '/u02/app/oracle/product/19.0.0.0/dbhome_1/md/admin';