$rest = "\n\t" . $new;    #see ikegami's reply; was ". $aphor"

##</code><code>##

@new  = $rest =~ m/\G(.{$min,$max}[\x20.])?/gsx;