Select Code to Download

use strict;
use warnings;
...

$spacestr =~ s/\p{Lb=ZW}//;
is $spacestr, 'ab', 'After stripping, string is plain "ab"';