open( my $command_out, "-|", $command ); sleep 3; close $command_out; #### open( my $command_out, "-|", $command ); close $command_out;