Help for this page
#!/usr/bin/env perl use warnings; ... move $file, $newfile or warn "$file: $!"; $newname++; }