Question

我在Ubuntu中使用以下Perl代码没有任何问题，但是当我在使用activeperl的XP中尝试它时，它会挂起，没有错误消息，只是一个空白屏幕。在标准perl和active 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

-Thanks

Answer 1

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

只有脚本使用的非核心软件包是Net::Twitter，它似乎在Windows下具有良好的测试结果 - platform test matrix。

Perl（windows和linux之间的区别）

1 个答案: