does this work on all perls?
Remove dead code
does using latest session help?