Hi, You have a problem with buffering. Use open with a pipe and set $| to turn off buffering om both filehandles. open HND, "$ToolsDir/bin/tk_mirror $firm $flags|" or die $!; my $oldfh = select HND; $|++; select LOG; $|++; select $oldfh; print LOG $_ while(<HND>); hth, Robert Friberg Ensofus AB _______________________________________________ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
