<%  
    use XML::XPathScript;
	$t->{turkey}{pre} =  'llama';
	$t->{chicken}{showtag} = 1;
	$t->{chicken}{testcode} = sub { return -1 };
#	$t->{'text()'}{testcode} = sub { $DB::single=1; $_[1]->{pre} = uc $_[0]->string_value; -1  };
%><%= apply_templates() %>