Возьмите вывод массива и поместите в новый массив (сценарий perl)

У меня есть массив, настроенный для проверки различных рабочих станций, чтобы увидеть, есть ли какие-либо журналы, и, если они есть, удалить их. Проблема в том, что каждый раз, когда я выполняю сценарий, он должен каждый раз обходить все рабочие станции (команда для удаления журналов делает это только по одному). Есть ли способ проверить все рабочие станции в первый раз и, если есть журналы, настроить следующий массив для проверки только тех, у которых есть журналы? И так далее и так далее, пока ничего не останется? Чтобы проверить 100 различных рабочих станций, потребуется немного времени, если только 10 или около того имеют журналы. Вот что у меня есть (Unix AIX и perl v5.6.1):

my @workstation = qw(ws1 ws2 ws3 ws4 ws5 ws6 ws7 ws8 ws9 ws10 ws11 ws12);

foreach my $workstation (@workstation){
$logcount = `ssh -q $workstation "ls /logs/$workstation | wc -l"`;
chomp $logcount;

if($logcount == 0){
print "";
}

if($logcount > 0){
print "$workstation: $count\n";
`ssh -q $workstation "/tools/log_remover /logs/$workstation"`
}