how to call oracle procedure from perl

[raj24x7]

below is my oracle procedure

DECLARE
  TYPE r_cursor IS REF CURSOR;
  c_emp r_cursor;
  er PLAN_T%ROWTYPE;
BEGIN
  OPEN c_emp FOR SELECT * FROM PLAN_T WHERE ROWNUM < 5;
  LOOP
      FETCH c_emp INTO er;
      EXIT WHEN c_emp%NOTFOUND;
      dbms_output.put_line(er.OBJ_ID || ' - ' || er.NAME);
  END LOOP;
  CLOSE c_emp;
END;

it prints obj_id and name in console in oracle, i want to print the same in a file in perl

Kindly help.