my $newstr = '';