print $r->Values('a') ;