perl.text