$_="abcdef";
s/@{[s".."."gr]}/$& /; print;


##</code><code>##

s/@{[s".."."gr]}\K/ /;


##</code><code>##

s/@{[s".."."gr]}\K/$"/;


##</code><code>##

s".."."gr;


##</code><code>##

@{[  ]}


##</code><code>##

s/.../$& /;

##</code><code>##

s/...\K/ /;

##</code><code>##

s/...\K/$"/;