Help for this page
#!/usr/local/bin/perl use DBI; ... $result->{LongReadLen}=512*1024; $result->{LongTruncOk}=1; $result->execute() or print $result->errstr();
create procedure ex (@name varchar(200)) as ... insert into x(cust_name) values(@name) end GO