map { $a = $b = $_;
                  $a => sub {'<H1>'.${b}.'</H1>'} } 1..5,