Perl (разница между Windows и Linux) - PullRequest
Новая
       11

Perl (разница между Windows и Linux)

1 голос
/ 10 марта 2011

Я использую следующий код 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;
}*

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

-Спасибо

1 Ответ

2 голосов
/ 10 марта 2011

Существует довольно обширная справочная страница о проблемах perl для Windows - perlwin32 .

Единственный неосновный пакет, который использует скрипт, это Net :: Twitter , который, похоже, имеет хорошие результаты тестирования под Windows - матрица тестирования платформы .

...