What am I missing? with this bind stuff

[Morrison Davis]

Here is my table.
REPLY_ID                                  NOT NULL NUMBER(15)
 REPLY                                              VARCHAR2(4000)
 REPLY_AUTHOR                                       VARCHAR2(10)
 REPLY_DATE                                         DATE
 THREAD_ID                                 NOT NULL NUMBER(15)
 TOOL_ID                                   NOT NULL NUMBER(15)
 ICON_ID                                            NUMBER(15)
 CATEGORY_ID                               NOT NULL NUMBER(15)

Here is my code:
                $stmt = $dbh->prepare("Insert into REPLIES values(?, ?, ?, ?, ?,
 ?, ?, ?)");
                $stmt->bind_param(1,reply_id.nextval,{TYPE => SQL_NUMBER});
                $stmt->bind_param(2,$REPLY,{TYPE => SQL_LONGVARCHAR});
                $stmt->bind_param(3,$myform{employee_id},{TYPE => SQL_VARCHAR});
                $stmt->bind_param(4,sysdate,{TYPE => SQL_DATE});
                $stmt->bind_param(5,$myform{threadid},{TYPE => SQL_NUMBER});
                $stmt->bind_param(6,$myform{toolid},{TYPE => SQL_NUMBER});
                $stmt->bind_param(7,$myform{iconid},{TYPE => SQL_NUMBER});
                $stmt->bind_param(8,$myform{category_id},{TYPE => SQL_NUMBER});
                $stmt->execute() or die $DBI::errstr;
Here is the error:
 ORA-01461: can bind a LONG value only for insert into a LONG column (DBD ERROR: 
OCIStmtExecute)