<%args> $str => undef <%init> use vars qw($keeper $request); $str =~ s/\r//g; return $str;