perl to query informix

Can anyone tell me how to convert this csh script into a perl script? I would rather not use dbi or any other add-ons. Thanks #!/bin/csh setenv INFORMIXSERVER n36_shmdbaccess << eof database pmsys@n36; UNLOAD TO '/net/n28/u1/out/share/edv/Ebase/c04b.txt' DELIMITER '|' SELECT EXTEND (start, YEAR to DAY), EXTEND (start, HOUR to MINUTE), subj1, subj3, switchid, dr_cand, dr_out, dr_in, ra_total_value, ra_false_value, ra_vox_value, ravox_fls_value, ir_cel_ho_req, ir_cel_ho_scomp, ir_cel_ho_sfail, ir_cel_ho_tcomp, ir_cel_ho_tfail, ir_sw_ho_scomp, ir_sw_ho_sfail, ir_sw_ho_tcomp, ir_sw_ho_talloc, ir_sec_ho_req, ir_sec_ho_scomp, ir_sec_ho_sfail, ir_sec_ho_tcomp, ir_sec_ho_tfail, ia_sec_ho_req, ia_sec_ho_comp, ia_sec_ho_sfail, ia_sec_ho_tfail, ir_tier_ho_comp, ir_tier_ho_fail, em_ho_req, em_ho_comp, em_ho_fail, ci_ho_dcomp, ci_ho_dfail, ci_ho_ucomp, ci_ho_ufail, fast_ho_req FROM tmmc0_4b_980708 WHERE EXTEND (start, HOUR to MINUTE) = "12:00";eof