Perl（与windows和linux的区别）

Question

我使用下面的Perl代码，在Ubuntu中没有任何问题，但是当我在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

-Thanks

Answer 1

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

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