Perl（windows和linux的区别）

Question

我在 Ubuntu 中使用以下 Perl 代码没有任何问题，但是当我在 XP 中使用 activeperl 尝试它时，它挂起，没有错误消息，只是一个空白屏幕。在标准 Perl 和活动 Perl 或 Windows 和 ubuntu 之间移动代码时，有什么我应该注意的问题吗？

*sub do_search
{
 my $term = shift @_;
 my $page = 1;
 my @results;
 while (scalar @results < $opts{maxresults})
 {
  my $rset = $handle->search({query=>$term, page => $page, rpp => $opts{rpp} });
  print "Searching for $term (page $page)\n" if $opts{verbose};
  if (ref $rset eq 'HASH' && exists $rset->{results})
  {
   # break out if no results came back
   last unless @{$rset->{results}};
   push @results, @{$rset->{results}};
   printf "Now we have %d entries\n", scalar @results if $opts{verbose};
  }
  # go to the next page
  $page++;
 }
 print_post($_) foreach @results;
}* 

来源：http://www.ibm.com/developerworks/web/library/l-perl-twitter/index.html

- 谢谢

Answer 1

关于特定于 Windows 的 Perl 问题有相当广泛的手册页 - perlwin32。

该脚本使用的唯一非核心包是 Net::Twitter，这似乎在 Windows 下获得良好的测试结果 - 平台测试矩阵。