RENAME:{
rename ("ic-fluc.dat" , "ic-fluc-iter-$iter.dat")  and last RENAME;
print "retrying iter $iter\n";
sleep 1;
redo RENAME;
}