print FILEHANDLE "$Sorry_line \n" x $punitive_cnt;