character:  /\w/ {print "Character: $item[1]\n"}

##</code><code>##

character:  /\w/ { print "Character: $item[1]\n" } { $item[1] }