declare
    c  utl_tcp.connection;
    ret_val varchar2(100);
    reading varchar2(100);
    cmd varchar2(100) := 'COMMAND(STUFF,SERVICE,EXPECTS)';
    cmd2 varchar2(100);
begin
    c := utl_tcp.open_connection(remote_host => 'sftp.greystar.com'
                               ,remote_port =>  9995
                               ,charset     => 'US7ASCII'
                               ,tx_timeout  => 10
                               );
    ret_val := utl_tcp.write_line(c, cmd);
    ret_val := utl_tcp.write_line(c);
  
    dbms_output.put_line(utl_tcp.get_text(c, 100));  
    sys.dbms_session.sleep(1);
    cmd2 := 'POLL(' || ret_val || ')';
    reading := utl_tcp.write_line(c, cmd2);
    reading := utl_tcp.write_line(c);
    dbms_output.put_line(utl_tcp.get_text(c, 100));
    utl_tcp.close_connection(c);  --Close the connection
END;