Update debug_perl.md