"<" _\\
false _proc execstr
%%%seq121
catcatspc
%
% get the list of all values
%
_\ "*Values" do
%
% create the list of attributes with escaped content
%
1 2 rot
{
 pop
 "_" atleft(
 {
  pop2
 }
 {
  true _proc execstr
  &"=" exch quocat
  [Push]
 } ifelse

} for

[Up]
{
 pop
 catspc [Pop] &
"ups " log()
} for

&">
"