有关Perl问题的讨论请到这里

ywchen2000

好东西亚.呵呵

menggy

各位大哥,我想请教一下,用PERL写一个简单的留言板的思路是什么啊?实现步骤是什么?不要源代码,给小弟点一下思路谢谢了

topvshot

perl之父的。Perl语言编程（第三版）
还是Perl语言入门(第四版)

hfahe

$tmpdir哪儿来的。。。

Post by trinity;382173
错误信息如下：
Use of uninitialized value in string eq at /usr/local/bin/smime_keys line 937.
Use of uninitialized value in string eq at /usr/local/bin/smime_keys line 942.
代码如下，部分略：
      sub newfile ($;$$) {
              # returns a file name which does not exist for tmp file creation
              my $filename = shift;
              my $option = shift;
937-> if (! $tmpdir and ($option eq "temp")) {
                      $tmpdir = mutt_Q 'tmpdir';
                      $tmpdir = newfile("$tmpdir/smime");
                      mkdir $tmpdir, 0700 || die "Can't create $tmpdir: $!\n";
              }
942->   $filename = "$tmpdir/$filename" if ($option eq "temp");
              my $newfilename = $filename;
              my $count = 0;
              while (-e $newfilename) {
                      $newfilename = "$filename.$count";
                      $count++;
              }

wang.zhiguo

问题：
查找文本中被引号包含的字符串，并且要求字符串中至少有一个中文字符。

正则表达式如下：
        \"(.*[\x80-\xFF]{2,}.*)\"

奇怪的是：查不到匹配的内容？？？

wangsheng0415

我是新来的，回复一下

ares_sheng

为什么不把书直接发成附件呢，这样更好啊！