@lst=map{ length($_)>1 and $_=~/[\|\{\}]$/?($_,chop($_)):$_ }@lst;