Perl DBI - запустить SQL Script с несколькими операторами

У меня есть файл sqlTest.sql используется для запуска некоторого SQL (создать объект / обновить / удалить / вставить), который может выглядеть следующим образом

    CREATE TABLE test_dbi1 (
    test_dbi_intr_no    NUMBER(15)
  , test_dbi_name       VARCHAR2(100);

UPDATE mytable 
SET col1=1;

    CREATE TABLE test_dbi2 (
    test_dbi_intr_no    NUMBER(15)
  , test_dbi_name       VARCHAR2(100);

Обычно я бы просто использовал SQLPLUS (изнутри Perl) для выполнения этого test.sql с помощью этой команды: @ test.sql

Есть ли способ сделать то же самое, используя DBI в Perl? До сих пор я обнаружил, что DBI может выполнять только одну инструкцию за раз, без ";" в конце.

Ответы на вопрос(4)

Ваш ответ на вопрос