begin
  dbms_network_acl_admin.create_acl (
    acl         => 'utl_mail.xml',
    description => 'Allow mail to be send',
    principal   => 'TEAMS_001',
    is_grant    => TRUE,
    privilege   => 'connect'
    );
    commit;
end;
/

begin
  dbms_network_acl_admin.add_privilege (
  acl       => 'utl_mail.xml',
  principal => 'TEAMS_001',
  is_grant  => TRUE,
  privilege => 'resolve'
  );
  commit;
end;
/

BEGIN
  DBMS_NETWORK_ACL_ADMIN.assign_acl (
    acl => 'utl_mail.xml',
    host => 'smtp.gmail.com', 
    lower_port => 465,
    upper_port => NULL); 
END;
/

begin
  utl_mail.send(
  sender     => 'почта моя',
  recipients => 'получатель',
  message    => 'Hello World'
  );
end;