Как я могу создать сжатый архив, состоящий из самых больших файлов из нескольких каталогов?

perl -F',\s+' -l -00nae '
   @ARGV and %h = (%h, reverse(/^(.*?),\s*(.*),/mg)),next;
   /^Device ID:\s+(\S+)/ && exists $h{$a=$1} && s/$/\nSN: $h{$a}/;
   print $_, eof() ? "": "\n";
' dispositivoss.csv dispositivos.dat > dispositivoss.dat

Когда вы просматриваете свои данные по абзацам за раз.