Сортировка изображений по разрешению… на сцене PowerShell

Вообщ в Vista и 7 большая часть нового функционала именно для администраторов, а не для домохозяек. Им то и aero хватит :)

Вы не путайте PIL конечно нагляднее, но я рад, что хоть какой-то стандартный Shell появился. Все эти {0} это .NET. Ждем вирусы :-)

Вы попросту предвзяты. Сравниваете one-liner с 52-строчником (ну на питоне в общем то one-liner-ы и невозможны). Хотите читаемости — перепишите то же самое так:

Copy Source | Copy HTML

1. [void][reflection.assembly]::LoadWithPartialName("System.Windows.Forms")
2.  
3. $source = "x:\source"
4. $target = "x:\target"
5.  
6. foreach ($file in dir $source -r -inc *.jpg, *.gif, *.png) {
7.     try {
8.         $image = new-object System.Drawing.Bitmap $file.FullName
9.         $targetdir = "{0}\{1}x{2}" -f $target, $image.Width, $image.Height
10.         if (!(test-path $targetdir)) {
11.             md $targetdir
12.         }
13.         copy $file $targetdir
14.  
15.         Write-Host $file -> $targetdir
16.     } catch {
17.         Write-Host $file " **IS NOT COPIED**"
18.     }
19. }
20.  

Вы действительно считаете, что питоновский вариант читабельней? Но с другой стороны, лично я б вместо перекладывания файлов по каталогам, взял бы Wia.ImageFile и проставил нужные теги

> ближе к оригиналу

Это, если не секрет, к какому оригиналу ближе? :) Потому как у меня в уме была больше классика ФП в виде LISP и скобочки, скобочки, еще больше скобочек :)

Jscript как то так:

Copy Source | Copy HTML

1. var Source = "x:\\source";
2. var Target = "x:\\target";
3.  
4. var Fso = new ActiveXObject("scripting.FileSystemObject");
5. var Image = new ActiveXObject("Wia.ImageFile");
6.  
7. function foreach(Collection, Proc) {
8.     for (var enumerator = new Enumerator(Collection); !enumerator.atEnd(); enumerator.moveNext())
9.         Proc(enumerator.item());
10. }
11.  
12. function SortImages(Folder) {
13.     foreach(Folder.Files, function (file) {
14.         try {
15.             Image.LoadFile(file);
16.             var targetPath = Target + "\\" + Image.Width + "x" + Image.Height + "\\";
17.             if (!Fso.FolderExists(targetPath)) {
18.                 Fso.CreateFolder(targetPath);
19.             }
20.             Fso.CopyFile(file, targetPath);
21.             WSH.Echo(file + " -> " + targetPath);
22.         } catch (e) {
23.             WSH.Echo(file + " **WAS NOT COPIED**");
24.         }
25.     });
26.     foreach(Folder.SubFolders, SortImages);
27. }
28.  
29. SortImages(Fso.GetFolder(Source));
30.  

вместо awk '{print $3}' можно использовать cut -d' ' -f3

поясление на всякий случай find ./ -type f рекурсивно находит все файлы в текущем каталоге и подкаталогах, xargs -n1 file — применить к каждому команду file которая выводит имя файла: тип файла, grep image отфильтровать только те строки, в которых тип содержит слово image, далее избавляется от типа файла, оставляем только снова имена, применяем к каждому gm identify которая выводит информацию об изображении, с помощью конструкции for f in $(command); do ...;done для каждой строки из результата делаем последовательность команд. сначала вырезаем колонку с информацией о размере изображения и записываем в переменную path; создаем каталог path(если он уже создан — оно ругнется, поэтому мы перенаправляем ругань в /dev/null, там опечатка, должно быть mkdir $path 2>/dev/null (чтобы не выводить сообщения об ошибках), дальше тоже опечатка, должно быть cp $(echo $f |awk '{print $1}') $path; — копируем первую колонку(пуль к файлу) в $path

в моем примере было gm identify -verbose, а не gm identify
gm identify test\ invalid.jpg |grep Geometry будет иметь errorlevel >0 и не выдаст ничего
т.е. в скрипте мы пишем
geo=$(gm identify test\ invalid.jpg |grep Geometry\:) && next_action
next_action выполниться только если errorlevel у grep == 0

Хороший пример (я не шучу — действительно клевый), вот только он делает совершенно не то, что пример из поста.