psrl.pl: perl analog to psrl.go