[tn] use perl-style expressions #277

Closed pengzhendong closed 2 months ago