No, but a simple regex will do that:  $line=~s/\r//g;