map {lc} =>
   <tag>a</tag>
   <tag>b</tag>
   <tag>c</tag>
map {lc($_), 1} =>
   <tag>a</tag>
   1
   <tag>b</tag>
   1
   <tag>c</tag>
   1
map {$_=lc($_); s/<tag>//; s/<\/tag>//; $_ => 2} =>
   a
   2
   b
   2
   c
   2