有人能说出这段代码的作用吗
can someone tell what this code snippet does
我试图理解下面提到的代码片段,目前我停留在第 3 行,在深入挖掘之后我知道 $MYPERL 是 perl 二进制文件 defined/located 而 $PERLDB 是什么 perl 调试器 i,e -d:ptkdb 基本上这是一个 perl 脚本和一些编写此代码的人如何包装它以使用最新的 perl 版本。谁能告诉我如何更改 MYPERL 变量值 /home/Desktop/goudar/perl/ 并执行脚本的其余部分?
#!/bin/sh
# -*- cperl -*-
exec $MYPERL -x $PERLDB -wS [=10=] ${1+"$@"}
#!perl
#line 6
### perl
use Cwd;
use Data::Dumper;
use List::MoreUtils qw/ uniq /;
use JSON;
use Mojo::JSON;
#rest of the code go here#
can someone tell what this code snippet does
它使用 env var MYPERL
指定的 Perl 解释器执行嵌入式 Perl 脚本。 env var PERLDB
中指定的选项(如果有的话)被传递给解释器。全局启用警告。
how i can change MYPERL variable value /home/Desktop/goudar/perl/ and execute rest of the script
如果启动脚本的进程是基于 bourne 的,那么
export MYPERL=/home/Desktop/goudar/perl/
就是说,我不知道为什么要将该值分配给 MYPERL
env 变量,因为脚本希望它是 Perl 解释器的路径。
我试图理解下面提到的代码片段,目前我停留在第 3 行,在深入挖掘之后我知道 $MYPERL 是 perl 二进制文件 defined/located 而 $PERLDB 是什么 perl 调试器 i,e -d:ptkdb 基本上这是一个 perl 脚本和一些编写此代码的人如何包装它以使用最新的 perl 版本。谁能告诉我如何更改 MYPERL 变量值 /home/Desktop/goudar/perl/ 并执行脚本的其余部分?
#!/bin/sh
# -*- cperl -*-
exec $MYPERL -x $PERLDB -wS [=10=] ${1+"$@"}
#!perl
#line 6
### perl
use Cwd;
use Data::Dumper;
use List::MoreUtils qw/ uniq /;
use JSON;
use Mojo::JSON;
#rest of the code go here#
can someone tell what this code snippet does
它使用 env var MYPERL
指定的 Perl 解释器执行嵌入式 Perl 脚本。 env var PERLDB
中指定的选项(如果有的话)被传递给解释器。全局启用警告。
how i can change MYPERL variable value /home/Desktop/goudar/perl/ and execute rest of the script
如果启动脚本的进程是基于 bourne 的,那么
export MYPERL=/home/Desktop/goudar/perl/
就是说,我不知道为什么要将该值分配给 MYPERL
env 变量,因为脚本希望它是 Perl 解释器的路径。