Select Code to Download

$dir = "/temp_gif";
opendir(DH, $dir) or die $!;
...
   $numbers_replace = int($number) + 338;
   rename("$dir/$_", "$dir/$numbers_replace.GIF") or warn $!;
}