Shell Programming and Scripting

I have a sqlplus report and inside that report I have the following piece of code to mail the report output to the email id.

My requirement is, instead of emailing the output I want to FTP that script to a different unix server (say ip as 10.10.1.1). How to modify this code to FTP the spool file to the unix server.

IF :g_email_to IS NOT NULL THEN
SELECT name INTO :g_dbname FROM v$database;
:g_host_cmd := 'echo "sending email ..."; sync; sync; sync; '||'uuencode '||:g_spool_file||' '||:g_attach_file
||' | mailx -r "oraclefinancials_'||:g_dbname||'"';
:g_host_cmd2 := 'cat '||:g_spool_file||' >> '||:g_outfile;

IF :g_prog_title IS NOT NULL THEN
IF instr(:g_prog_title,' ') > 0 THEN
v_quote := '''';
ELSE
v_quote := NULL;
END IF;
:g_host_cmd := :g_host_cmd||' -s '||v_quote||:g_prog_title||v_quote;
END IF;

IF instr(:g_email_to,' ') > 0 THEN
v_quote := '''';
ELSE
v_quote := NULL;
END IF;
:g_host_cmd := :g_host_cmd||' '||v_quote||:g_email_to||v_quote||'; echo done';
ELSE
:g_spool_file := NULL;
:g_host_cmd := 'exit';
:g_host_cmd2 := 'exit';
END IF;