पर्ल हैश डेटा :: डम्पर

Question

पर्ल में मुझे एक विशाल हैश का विश्लेषण करने की आवश्यकता है, इसलिए मैं इसे Data::Dumper मॉड्यूल का उपयोग करके फ़ाइल में प्रिंट करता हूं। क्योंकि यह एक बड़ी फाइल है, इसे पढ़ना बहुत मुश्किल है। क्या यह किसी भी तरह से Dumper आउटपुट को अच्छी तरह मुद्रित करना संभव है, इसलिए जब मुझे एक स्ट्रिंग मिल जाएगी जो मैं ढूंढ रहा हूं, तो मैं तुरंत उस महत्वपूर्ण संरचना को देख पाऊंगा जहां मैं जिस स्ट्रिंग को ढूंढ रहा हूं उसे संग्रहीत किया जाता है?

  use Data::Dumper; 
      ... 
      print Dumper $var; 

सबसे अच्छा वाक्य रचना या वैकल्पिक अच्छा उत्पादन प्राप्त करने के लिए क्या है:

वर्तमान में मैं सिर्फ एक सरल कोड का उपयोग कर रहा हूँ?

Answer 1

मैं लगभग हमेशा

$Data::Dumper::Indent = 1; 
$Data::Dumper::Sortkeys = 1; 

सेट Data::Dumper साथ। पहला बयान आउटपुट को अधिक कॉम्पैक्ट बनाता है और अधिक डेटा पठनीय होता है जब आपकी डेटा संरचना कई स्तरों की गहराई होती है। दूसरा बयान भी

$Data::Dumper::Useqq = 1; 

पर विचार डेटा संरचना बाइनरी डेटा या एम्बेडेड टैब/नई-पंक्तियों, शामिल है, तो यह आसान उत्पादन स्कैन और जल्दी चाबियाँ आप सबसे में रुचि रखते हैं खोजने के लिए बनाता है।

जो उत्पादन होगा उस डेटा के लिए एक उपयुक्त पठनीय प्रतिनिधित्व।

perldoc में और भी बहुत कुछ।

Answer 2

यह सवाल का उत्तर देता है।

my $WWW_Scripter_Plugin_JavaScript_JE = ${ $VAR1->[1]{156192192} }; 
my $JE_Object_String = ${ $WWW_Scripter_Plugin_JavaScript_JE->{pf}{String} }; 
my $JE_Object_Function = ${ $JE_Object_String->{props}{search} }; 
my $REF = ${ $JE_Object_Function->{global} }; 
my $HTML_DOM_Element_Img = $REF->{classes}{'HTML::DOM::Element::Img'}; 

यह भी encapsulation का उल्लंघन करता है। पर्ल आपको ऐसा करने देता है, लेकिन आपको यह पूछना चाहिए कि प्रकाशित WWW :: स्क्रिप्टर एपीआई के साथ डेटा कैसे प्राप्त करें।

Answer 3

एक संभावित समाधान Data::Dumper::Perltidy का उपयोग करना है जो Perltidy के माध्यम से डेटा :: डंप का आउटपुट चलाता है।

#!/usr/bin/perl -w 

use strict; 
use Data::Dumper::Perltidy; 

my $data = [{ title => 'This is a test header' },{ data_range => 
      [ 0, 0, 3, 9] },{ format  => 'bold' }]; 

print Dumper $data; 

__END__ 

प्रिंटों:

$VAR1 = [ 
    { 'title'  => 'This is a test header' }, 
    { 'data_range' => [ 0, 0, 3, 9 ] }, 
    { 'format'  => 'bold' } 
]; 

एक और तरीका है Data::Dump उपयोग करने के लिए है।

Answer 4

$Data::Dumper::Sortkeys = 1; 

यदि आप अधिक विश्वसनीय परिणाम प्राप्त करना चाहते हैं तो आपको अगले डम्पर का पालन करना होगा। उस समारोह को संचालित करने के लिए उपयुक्त शब्द में रखें।