在Perl中打印多行字符串而不使用变量替换的简单方法是什么？

发布时间：2020-12-15 23:31:57 所属栏目：大数据来源：网络整理

导读：我有一个Perl程序,它读入一堆数据,然后输出,然后输出几种不同的文件格式.我想让Perl成为这些格式之一(以.pm包的形式),并允许人们在他们自己的Perl脚本中使用munged数据. 使用Data::Dump::pp可以轻松打印出数据. 我还想在生成的包中打印一些辅助函数. 在没有

我有一个Perl程序,它读入一堆数据,然后输出,然后输出几种不同的文件格式.我想让Perl成为这些格式之一(以.pm包的形式),并允许人们在他们自己的Perl脚本中使用munged数据.

使用Data::Dump::pp可以轻松打印出数据.

我还想在生成的包中打印一些辅助函数.

在没有变量替换的情况下打印多行字符串的简单方法是什么？

我希望能够做到：

print <<EOL;
  sub xyz { 
    my $var = shift;
  }
EOL

但后来我不得不逃避所有的$.

有一个简单的方法吗？也许我可以创建一个实际的子和一些神奇的漂亮打印机打印内容？打印的代码不必与输入匹配,甚至不清晰.

解决方法

尝试将代码编写为实际的perl子例程,然后使用 B::Deparse在运行时获取源代码.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!