unless (-e $fn) {
    print "Renamed $_ to $nn \n" if rename $_,$nn
} else {
    # for example ...
    push(@errors,"Tried to rename $_ to $nn, file exists\n")
}