print map {s/\[|\]//g; $_} <>;

##</code><code>##

s/\[|\]//g, print for <>;