tailieunhanh - O’Reilly Mastering Perl 2007 phần 3

Tôi làm một ít công việc thêm vào sản lượng Dumper. Nó thường mang lại cho tôi một cái gì đó tôi có thể sử dụng trong eval, vì vậy đó là một biểu hiện Perl với chuyển nhượng một vô hướng và dấu chấm phẩy một dấu. Tôi sử dụng một vài sự thay thế để có được thoát khỏi những tính năng bổ sung. | BEGIN use Carp Heavy no warnings redefine Carp format_arg sub packageCnrpi my arg shift if notdefined arg b arg undef elstf ref arg useData Dneeper localSData Dumper Indent 0 salt to taste locaie ata Dunpeo Terse 0 arg Dumper arg arg s A VARad sr s arg s s else . a rg - aa w g arg a ttr_len_trim arg MaxArgLen tat . - arg unless arg A- d. z j b sa t cntr 1 - --x. i m return arg I do a little bit o extaawork ontheD m eroutput. hnormaUiegivesmetomathmgl can use in evaa - a o tt sa Perl expression with an assignment to a scalar and a trailing semicolon. I use a couple of substitutions to get rid of these extras. I want to get rid of the Data Dumper artifactsonthe ends VAR . leave pu st Site a . N ow whenr runtdesame peogramlhatl earhepl get tt t etemems of the anonympuaarrayedatljoesre dtom lteuey_and_divide at coMew pniite 6r __ uu meir mrtS .e_sni_t ivide s 46 main do_it 4 5 called at line 38 9 20 1 The best part o aU oa x - I. mathat . Pl ta1 11 T - m one stshdc uema to get all of thee Ii-tottot-n----. aV usedthtsforventcompeexsdPoations with lots of arguments andcomplex data structures giving me a Perl-Style stack dump. It may be tricky to bts ibs a mostpom ers to get and to dii_uSẽ too . The Best Debugger in the World I 55 Safely Changing Modules In the previous section I changed Carp format_arg to do something different. The general idea is very useful for debugging since I m not only going to find bugs in the code that Iwrite butmost oftenin the modules I use or in code that someone else wrote. When I need to debug these tifienf ln other files I want to add some debugging statements or thbnge the code someiaaw lib set what haastns. However t draft wwnt ba change thoosiuinal source files whenever I do that I tend to make things worse no matter howcargfuttamboersfgrethemtg thetr twant to erase ana damsoe t gg and t dbh t tsae tb to abfhee aoctnc rise. I do somethtsg simp e .