Perl local libraries - Sybase



我将构建一个非常小的脚本,用于在perl中转储Sybase数据库。问题是Perl没有预装sybase支持。我没有访问服务器根目录的权限,所以我无法安装任何包,也无法到达perl文件夹。服务器没有配置为互联网访问,所以我必须通过FTP"手动"交付包。

所以,我的问题是,是否有简单的方法来做到这一点。我唯一需要的库是DBI::Sybase或Sybase独立库(也许我还没有做足够的研究,甚至不需要这么多?),这意味着我希望能够把.pm文件放在那里,通过加载它使用localModule然后运行我的小脚本。如果我正确理解了我的主管的话,这个解决方案必须在红帽和Solaris上工作。

由于您主要关心的是转储数据库,而不是数据检索和操作,因此您可能不必使用DBI::Sybase或其他未预安装的perl模块。

如果没有更多的细节,很难非常具体,但这里是概述。perl脚本可以执行一些SQL脚本,这些脚本可以转储数据库。

您可以将您希望转储的数据库列表放在配置文件(或env文件)中,或者您可以通过调用isql来动态生成它,使用-b选项来抑制标题,nocount来抑制页脚,并将输出存储在数组中。

一旦您有了数据库列表,只需循环它们,运行另一个isql命令来转储每个数据库。

最新更新