[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 WHY 于 2020-4-25 22:40 编辑

需先排序再重命名。
假设同时存在 120.png 和 130.png,如果不排序,120.png 重命名为 130.png 肯定失败。
  1. @echo off & setlocal enabledelayedexpansion
  2. if "%~1" EQU "ARG" (
  3.     for /f %%i in ( 'dir /b *.png ^| findstr /i /b /e "[1-9][0-9]*\.png 0\.png"') do (
  4.         set "s=0000000000%%~ni"
  5.         set /a n=%%~ni+10
  6.         echo;!s:~-10! %%i !n!
  7.     )
  8. ) else (
  9.     for /f "tokens=2,3" %%i in ('"%~f0" ARG ^| sort /r') do ren "%%i" %%j%%~xi"
  10.     pause & exit
  11. )
复制代码
1

评分人数

    • smss: 大神是没人来提问 憋坏了 一下给出几种方案技术 + 1

TOP

回复 14# netdzb


    是谁告诉你 awk 或 gawk 不需要排序的?

TOP

  1. PowerShell "dir *.png | ?{$_.BaseName -match '^([1-9]\d*|0)$'} | sort -Desc {1*$_.BaseName} | ren -NewName{''+(10+$_.BaseName)+$_.Extension}"
复制代码

TOP

如果一定要用 gawk,可以这样:
  1. dir /b *.png | gawk "{if(match($0,/^([1-9][0-9]*|0)\.[^.]+$/,m))a[$0]=1*m[1]}END{len=asort(a,b);for(i=len;i>0;i--)system(\"cmd /c Ren \"b[i]\".png \"(b[i]+10)\".png\")}"
复制代码

TOP

回复 18# netdzb


    17楼的脚本你认为不是 gawk 吗?

TOP

GNU sort
  1. dir /b *.png | sort -n -r | gawk "{ if( match($0,/^([1-9][0-9]*|0)(\.[^.]+)$/,m) ) print $0, (m[1]+10)m[2] }"
复制代码

TOP

返回列表