s/(^.*<)\:([a-z]+)>/ "$1" . ( exists $inst{ $2 } ? $inst{ $2 } : $inst{ default } ) /e;

##</code><code>##

s/(^.*<)\:([a-z]+)>/ "$1" . ( $inst{ $2 } || $inst{ default } ) /e;