thejtechs的专栏

最近要写个perl脚本发送带附件的html格式的邮件，要求从csv中读取发件人，收件人，以及邮件html body中的变化部分，好久没写perl脚本，有点吃力了。。:) #!/usr/local/bin/perl -w use strict; use warnings; if($#ARGV != 0){ die "Usage: $0 "; } # static properties

在这里我不想详细讲解他们的用法，只说说他们比较明显的区别。 system执行一条命令，并返回退出状态，它并不会捕获命令的输出，它会开启一个新的进程，父进程会等待它执行完后在继续执行 exec会结束当前的进程并执行一条命令但绝不返回 “反引号会执行外部命令并捕获输出，反引号中内插变量会在编译的时候做替换。

很多时候在不同系统之间进行数据交互的时候，往往会用到各种标准的数据载体,xml, file, JMS。在这里主要讲讲用perl发送和接收MQ消息。 我们用到的MQ server是IBM的MQ. 大致的步骤如下： 1，新建queue manager对象 2，新建queue对象 3，新建MQ message对象 4，通过queue对象get/put message对象。 5，关闭queu