en windos deberia funcionar igual?
lo otro instale ActivePerl-5.8.8.817-MSWin32-x86-257965.exe en mi pc
y al poner C:perl se pega....
tonces en vista de esto modifique el script asi:
opendir(DIR,".");
while($f=readdir(DIR))
{next unless ($x)=$f=~/ERP_025_20070411_(\d+)/;next if $x <= 40; $x+=1;print $f;rename($f,"ERP_025_20070411_$x.txt")}
y bueno. no me funciona...