my @handles;
foreach my $f ( 0 .. 9 )
{
    open $handles[$f], "$command |";
}