<{perl $_ = '
    '; my @names = content_matching ("*"); foreach my $name (sort @names) { $_ .= "
  1. Content: \"$name\"". "
    2. \n"; } $_ .= '
'; $_; }> <{perl $_ = '
    '; my @names = content_matching ("*"); foreach my $name (sort @names) { next if ($name =~ /DumpVars_/); $_ .= "
  1. Content: \"$name\"
    ". "
    \n". make_safe (get_content($name))."\n". "
    2. \n"; } $_ .= '
'; $_; }>