Help for this page
$n =~ s/(^| )$a( |$)/$1$b$2/i;
$n =~ s/(^|(?<= ))$a((?= )|$))/$b/i;
$n =~ s/(?<![^ ])$a(?![%a])/$b/i;
"FOO foo" =~ s/(^| )foo( |$)/${1}bar$2/ig