请教Perl调用.exe程序的问题

[leon51]

请教要求当$pn为大写字母“Y”开头时，调用“1.exe”并将$pn作为参数传递给“1.exe”怎么写啊，我按下面这种写法无效：

if ($pn=~/^Y$/) {system("ChooseSampleOrMass.exe$pn"); }

[fibbery]

# 1.
system("1.exe $pn") if $pn =~ /^Y/;

# 2.
if ($pn =~ /^Y/)
{
    system("1.exe $pn");
}

# system函数调用也可以使用反小点｀
｀1.exe $pn`;

[leon51]

引用

# 1.

system("1.exe $pn") if $pn =~ /^Y/;
 
# 2.
if ($pn =~ /^Y/)
{
    system("1.exe $pn");
}
 
# system函数调用也可以使用反小点｀
｀1.exe $pn`;

hi fibbery，如果我这个exe与perl在同一文件夹下面，exe要带路径吗？如果要，要怎样写呢？