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。