$Char = "a";
for (@images) {
 next if $_ eq ''; # if you didn't filter them above
 rename $ipath.$_,$ipath.$add5.$add6.($Char++).'.jpg';
}