我正在尝试在 HP-UX 上编译 netcat-0.7.1,但在制作时总是出现此错误:
../doc/texi2pod.pl ./netcat.texi netcat.pod
/^([^=]+)(?:=(.+))?/: ?+* follows nothing in regexp at ../doc/texi2pod.pl line 48.
*** Error exit code 255
我打开 texi2pod.pl 并尝试像这样放置 \Q \E:/\Q^([^=]+)(?:=(.+))?\E/
但它不起作用。如果有人可以帮助我,那就太好了。
这是代码:
($flag, $value) = ($flag =~ /^([^=]+)(?:=(.+))?/);
die "no flag specified for -D\n" unless $flag ne "";
die "flags may only contain letters, digits, hyphens, dashes and underscores\n"
unless $flag=~ /^[a-zA-ZO-9_-]+$/;
perl -v:
Version 4.0
Revision 4.0.1.8