С разрешения Сергея Казакова - код для оптимизации html после обработки его конвертером, который вставляет кучу не нужных
, пустых строк и неправильно делает align в картинках. #!/usr/bin/perl $path = '/usr/local'; $inputname = $ARGV[0]; $pathname = $ARGV[1]; $file = ''; open(IN, "$path/bin/wvWare -x $path/share/wv/wvZopeCont.xml -c koi8-r $inputname |"); while () { $file = "$file$_"; } close(IN); $file =~ s/\n{2,100}/\n/gs; $file =~ s/<\/div>/ <\/div>/igs; @divs = $file =~ m/()/isg; foreach $d (@divs) { @imgs = $d =~ m/(