Select Code to Download

package dbS::Sybase::Parse::SQL_File;

...
}

1;

use dbS::Sybase::Parse::SQL_File qw(open_file next_batch);

....
...
     dbh_do($local_dbh, $sql_batch);
  }
}