|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Reznikov 2:4600/220 16 Nov 2005 02:04:34 To : All Subject : IPC::Open2::open2 --------------------------------------------------------------------------------
Может я чего-то не понимаю? Под Win9x у меня скрипт работает без вопросов, а под
WinXP - не хочет (причём, насколько я помню, в перле 5.6 работало и в WinXP).
Симтомы - lynx.exe висит в памяти... Причём продолжает висеть, даже если
остановить процесс perl'а. Может я что-то делаю не так?
Вот код:
my $tmp = 'lynx.exe -dump -force_html -image_links
-display_charset=utf8 -assume_unrec_charset=cp1251 -stdin';
if (defined($set{charset}))
{ $tmp .= " -assume_charset=$set{charset}"; }
else { $chrs = undef; }
my $pid = IPC::Open2::open2(my $pipe_rd, my $pipe_wr, $tmp);
binmode($pipe_rd); binmode($pipe_wr);
print $pipe_wr $text;
close($pipe_wr);
$text = decode(join('', <$pipe_rd>)."\n", undef, 'utf8');
close($pipe_rd);
Баюшки !!
[ Черёмухин aka Гибкость TEAM ] [ UU9JЁКЛМH ]
--- Дедушка GoldED+/W32 1.1.5-2004.01.21
* Origin: NEC, сисопина злая... (2:4600/220)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/13334437a6a5a.html, оценка из 5, голосов 10
|