悬赏求助：Perl转shell

bikkuri

大家好！
我有一个问题向各位Perl高手紧急悬赏求助！
我在Linux上用shell开发了一个系统，但是其中有一个模块是一个离职同事用Perl写的，我想把这个Perl模块转成shell脚本，整合进我写的系统里。
我在同事的Perl脚本上加了前两行和最后一行。
但是执行时报如下错误：

1. syntax error at -e line 209, at EOF
   
2. Missing right curly or square bracket at -e line 209, at end of line
   
3. Execution of -e aborted due to compilation errors.
   

复制代码

但是去掉我加的前两行和最后一行，即恢复到修改之前，再执行就没有任何错误，可以正常执行。
请问这个错误是怎么产生的呢？要如何修改才能正常执行呢？
谢谢大家！

104359176

回复 3# bikkuri


    引用大范围的文本最好使用：

1. << 'EOF';
   
2. ...
   
3. 
   
4. EOF

复制代码

因为文本中可能包含各种字符，例如单引号，双引号等。

104359176

Shell 系统可以加载 TK 界面吗？可以执行 http 协议吗？

bikkuri

我已经把TK界面去掉了，原来的perl脚本已经可以在命令行界面下正常执行。

sohusina

把该perl脚本命名如abc.pl。然后在shell下exec即可。

bikkuri

我当然知道可以用shell来调用perl脚本。
但是我想做的是把perl整合到shell脚本里，作为shell脚本的一个函数，不希望通过另外读文件的方式来调用perl脚本。

回复 4# sohusina


   

bikkuri

谢谢您的指点！
改用EOF以后shell脚本中的perl程序模块可以正常运行了。

回复 6# 104359176