Perl 通过sqlplus 执行Spool语句

这篇具有很好参考价值的文章主要介绍了Perl 通过sqlplus 执行Spool语句。希望对大家有所帮助。如果存在错误或未考虑完全的地方,请大家不吝赐教,您也可以点击"举报违法"按钮提交疑问。

====>a.sql
spool on
set pages 50000
set lines 200    
set trims on
set colsep ','
set heading off
set termout off
set feedback off

SPOOL t2.csv

select  /*+PARALLEL(20)*/ 
BROAD_RATE_ATTR_ID,
'20230707','duanhw'
from T_DIM_BROAD_RATE;

SPOOL OFF
exit
====>


my $sql_script = 'a.sql';                                                                     
system("sqlplus user/passwd\@DB3 \@${sql_script} \\ ");

文章来源地址https://www.toymoban.com/news/detail-529222.html

到了这里,关于Perl 通过sqlplus 执行Spool语句的文章就介绍完了。如果您还想了解更多内容,请在右上角搜索TOY模板网以前的文章或继续浏览下面的相关文章,希望大家以后多多支持TOY模板网!

本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处: 如若内容造成侵权/违法违规/事实不符,请点击违法举报进行投诉反馈,一经查实,立即删除!

领支付宝红包 赞助服务器费用

相关文章

  • perl脚本调用openssh不能正确执行(ctl_dir /root/.libnet-openssh-perl/ is not secure)的原因排查

    在使用perl脚本的时候,通过Net::OpenSSH去获取执行节点的信息是一种常用的方法。在某个环境中,执行命令的时候出错,下面展示一下相关的代码 在这段代码执行的时候,直接返回“fail: cann’t access by ssh” 通过手动的方式进行验证,在当前节点通过ssh方式是可以正常登录指定

    2024年02月14日
    浏览(38)
  • Mac M1通过homebrew安装Redis报错(perl: unknown or unsupported macOS version: :dunno)

    升级homebrew,命令如下: 通过命令 brew install redis 安装Redis,异常如下: 参考博文MAC 升级后brew报错后,运行命令 brew update-reset ,结果如下: 查看homebrew版本( brew --version ),结果为: 最终解决 上述 brew update-reset 升级命令即为该问题的解决办法。homebrew升级完成后,重新运行

    2024年02月07日
    浏览(61)
  • perl语言介绍

    Perl语言是一种高级动态编程语言,它是一种通用的脚本语言,常用于Web开发、系统管理、网络编程等领域。Perl语言由Larry Wall于1987年开发,它的设计理念是“简单、实用、灵活、有表现力”。Perl语言是一种自由软件,它的开发和使用都受到了广泛的支持和推崇。本文将为您

    2024年02月01日
    浏览(44)
  • Perl爬虫程序

    以下是一个使用Perl爬虫程序,用于爬取图像。每行代码的中文解释如下: 这个程序首先使用Mojo::UserAgent_proxy获取一个IP。然后使用这个代P发送GET请求到,并检查请求是否成功。如果成功,则从响应体中获取图像URL,并使用Mojo::UserAgent下载图像。最后,将下载的图像保存到本

    2024年02月06日
    浏览(35)
  • perl列表创建、追加、删除

    主要是通过push和unshift函数来实现。其中,push是追加到列表尾,unshift是追加到列表头。 主要是通过pop和shift函数来实现。其中,pop是从列表尾删除一个元素, shift是从列表头删除一个元素。 从运行结果可以看到,分别实现了头尾2端追加元素,及头尾2端删除元素。

    2024年02月05日
    浏览(38)
  • 【perl】报错合集

    (注:可能会不定时更新) 1.Name “main::x” used only once: possible typo at … 给某个变量赋值但是从来没有用它,或者变量之只用一次但没有给它赋值,这一般表示在代码中隐含某个错误。 大概唯一“合理”的解释就是输入错。比如说给变量赋值, 你可能会对\\\"main::“部分没有$

    2024年02月13日
    浏览(33)
  • 无涯教程-Perl - seekdir函数

    此功能将DIRHANDLE中的当前位置设置为POS。 POS的值必须是Telldir先前返回的值。 seekdir()函数类似于Unix seekdir()系统调用。 以下是此函数的简单语法- 如果失败,此函数返回0,如果成功,则返回1。 以下是显示其基本用法的示例代码,在/tmp内创建一个目录testdir- 执行上述代码后,将产生

    2024年02月13日
    浏览(34)
  • 无涯教程-Perl - redo函数

    此函数将重新启动当前循环,而不会强制判断控制语句。块中不再执行任何语句。如果存在继续块,将不会执行。如果指定了LABEL,则在LABEL标识的循环开始时重新开始执行。 以下是此函数的简单语法- 此函数不返回任何值。 以下是显示其基本用法的示例代码- 执行上述代码后,将

    2024年02月13日
    浏览(31)
  • 无涯教程-Perl - use函数

    此函数将MODULE导出的所有功能(或仅LIST引用的功能)导入当前包的名称空间。有效等效于- 也用于在当前脚本上强加编译器指令(编译指示),尽管从本质上讲它们只是模块。 请注意,use语句在编译时进行判断。在执行时判断require语句。 如果VERSION参数存在于Module和LIST之间,则使用将

    2024年02月12日
    浏览(37)
  • 无涯教程-Perl - grep函数

    此函数从LIST中提取EXPR为TRUE的所有元素。 以下是此函数的简单语法- 此函数返回在标量context中表达式返回true的次数以及在列表context中与表达式匹配的元素列表。 以下是显示其基本用法的示例代码- 执行上述代码后,将产生以下输出- Perl 中的 grep函数 - 无涯教程网 无涯教程网

    2024年02月13日
    浏览(34)

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

博客赞助

微信扫一扫打赏

请作者喝杯咖啡吧~博客赞助

支付宝扫一扫领取红包,优惠每天领

二维码1

领取红包

二维码2

领红包