use Proc::Queue size => 5, qw(system_back); for my $args (@args) { system_back $cmd, @{$args}; }