Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Perl : reading data from dumper variable
Top Forums Shell Programming and Scripting Perl : reading data from dumper variable Post 302984617 by giridhar276 on Friday 28th of October 2016 06:45:41 AM
Old 10-28-2016
Perl : reading data from dumper variable
Hi team,

# PERL
I have Dumper variable in perl and containing the below data and trying to fetch value and name from the reference variable.

Code:
$VAR1 = {
          'retainSysIds' => 'true',
          'variables' => [
                         {
                           'variable' => [
                                         {
                                           'value' => ['server1'],
                                           'name' => ['db'],
                                         },
                                         {
                                           'value' => ['server2'],
                                           'name' => ['application'],
                                          }
                           }
                             ]


Below is my Perl code and couldn't able to read any data.

Code:
     foreach $element ( @{$xml_ref->{variables}}){
			
		#print %$element),"\n";
		foreach my $single ( keys(%{$element}))
		{
			print "testing :",%{$element} ;
		}
     }

Could anyone please help me in this regard?
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Reading data into muti-dimentional array - in perl

Just want to learn how these are read into array but I don't seem to get it right what do I go wrong? Below is the sample Thanks input 1 2 3 4 5 6 7 8 9 1 2 3 4 5 6 7 #!/usr/bin/perl open (InFILE,"input"); while (<InFILE>) { @ar = split ; (5 Replies)
Discussion started by: zap
5 Replies

2. Shell Programming and Scripting

perl not reading my variable

I'm trying to make changes in a file using the following bash script: #!/bin/bash MYHOME=`echo $HOME` README=$MYHOME"/environment" IAM=`whoami` CHANGEPATHLIST="TALOG TACONFIG TAINFO TAWORK TMPSPACE" for var in $CHANGEPATHLIST do perl -pi -e 's/sacuser1/$IAM/ if m/$var/' $README... (3 Replies)
Discussion started by: yoonixq4u
3 Replies

3. Shell Programming and Scripting

PERL: reading 2 column data into Hash file

I am trying to read in a 2 column data file into Perl Hash array index. Here is my code. #!/usr/bin/perl -w use strict; use warnings; my $file = "file_a"; my @line = (); my $index = 0; my %ind_file = (); open(FILE, $file) or die($!); while(<FILE>) { chomp($_); if ($_ eq '') { ... (1 Reply)
Discussion started by: subhap
1 Replies

4. Shell Programming and Scripting

Reading data from file and assigning to variable

I was trying to store the number of lines in a file and store it in a file.after that i want to store the information in a file to a variable which is further used in the if loop to check certain condition. #!/bin/bash cat <file> | wc -l > count.txt x="$count.txt"; i=10; if ; then cat... (10 Replies)
Discussion started by: sudhakaryadav
10 Replies

5. Shell Programming and Scripting

Perl: Reading data from other file

Hi, I am writting some perl scripts for daily backup process. In which I want to pass some data/referance from another txt file. Text file contains only one column and multiple rows. I want to pass this data to variables of another perl script. e.g. Refdoc.txt file contains data as: perl1... (3 Replies)
Discussion started by: n.dba
3 Replies

6. Shell Programming and Scripting

log data::dumper output to file

I am new to Perl and just started using the data::dumper. i have been unable to figure out how to take the output that comes from the data::dumper and redirect it to a file. I tried this.... sub postEvent { my $this = shift; # print "Passed parameters, " . Dumper(\@_) .... (3 Replies)
Discussion started by: LRoberts
3 Replies

7. Shell Programming and Scripting

Data extraction in perl variable

HI, i have variable in perl like below $tmp="/home/sai/automation/work/TFP_GN.txt" it can conatain any path its filled from config file. now i want extarct the path upto this /home/sai/automation/work/ and put it in another variable say... (4 Replies)
Discussion started by: raghavendra.nsn
4 Replies

8. Shell Programming and Scripting

Perl Script for reading table format data from file.

Hi, i need a perl script which reads the file, content is given below. and output in new file. TARGET DRIVE IO1 IO2 IO3 IO4 IO5 ------------ --------- --------- --------- --------- --------- 0a.1.8 266 236 ... (3 Replies)
Discussion started by: asak
3 Replies

9. Shell Programming and Scripting

Perl :: reading values from Data Dumper reference in Perl

Hi all, I have written a perl code and stored the data into Data structure using Data::Dumper module. But not sure how to retreive the data from the Data::Dumper. Eg. Based on the key value( Here CRYPTO-6-IKMP_MODE_FAILURE I should be able to access the internal hash elements(keys) ... (1 Reply)
Discussion started by: scriptscript
1 Replies

10. Shell Programming and Scripting

Error while reading variable from a file in perl script

I have a file abc.ini and declared many variables in that file, one of the variable(DBname) value I am trying to read in my perl script but getting error. File abc.ini content # database name DBname =UATBOX my $ex_stat; my $cmd_output; $ex_stat = "\Qawk '/^DBname/{print... (2 Replies)
Discussion started by: Devesh5683
2 Replies

LEARN ABOUT DEBIAN

mdom::dumper

MDOM::Dumper(3pm)					User Contributed Perl Documentation					 MDOM::Dumper(3pm)

NAME

       MDOM::Dumper - Dumping of MDOM trees

SYNOPSIS

	 # Load a document
	 my $Module = MDOM::Document->new( 'MyMakefile' );

	 # Create the dumper
	 my $Dumper = MDOM::Dumper->new( $Module );

	 # Dump the document
	 $Dumper->print;

DESCRIPTION

       The MDOM trees in MDOM are quite complex, and getting a dump of their structure for development and debugging purposes is important.

       This module provides that functionality.

       The process is relatively simple. Create a dumper object with a particular set of options, and then call one of the dump methods to
       generate the dump content itself.

METHODS

   new $Element, param => value, ...
       The "new" constructor creates a dumper, and takes as argument a single MDOM::Element object of any type to serve as the root of the tree to
       be dumped, and a number of key->value parameters to control the output format of the Dumper. Details of the parameters are listed below.

       Returns a new "MDOM::Dumper" object, or "undef" if the constructor is not passed a correct MDOM::Element root object.

       memaddr
	   Should the dumper print the memory addresses of each MDOM element.  True/false value, off by default.

       indent
	   Should the structures being dumped be indented. This value is numeric, with the number representing the number of spaces to use when
	   indenting the dumper output. Set to '2' by default.

       class
	   Should the dumper print the full class for each element.  True/false value, on by default.

       content
	   Should the dumper show the content of each element. True/false value, on by default.

       whitespace
	   Should the dumper show whitespace tokens. By not showing the copious numbers of whitespace tokens the structure of the code can often
	   be made much clearer. True/false value, on by default.

       comments
	   Should the dumper show comment tokens. In situations where you have a lot of comments, the code can often be made clearer by ignoring
	   comment tokens. True/value value, on by default.

       locations
	   Should the dumper show the location of each token. The values shown are [ line, rowchar, column ]. See "location" in MDOM::Element for
	   a description of what these values really are. True/false value, off by default.

   print
       The "print" method generates the dump and prints it to STDOUT.

       Returns as for the internal print function.

   string
       The "string" method generates the dump and provides it as a single string.

       Returns a string or undef if there is an error while generating the dump.

   list
       The "list" method generates the dump and provides it as a raw list, without trailing newlines.

       Returns a list or the null list if there is an error while generation the dump.

SUPPORT

       See the support section in the main module.

AUTHOR

       Adam Kennedy <adamk@cpan.org>

       Zhang "agentzh" Yichun "<agentzh@gmail.com>"

COPYRIGHT

       Copyright 2001 - 2006 Adam Kennedy.

       This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

       The full text of the license can be found in the LICENSE file included with this module.

perl v5.12.4							    2011-08-28							 MDOM::Dumper(3pm)
All times are GMT -4. The time now is 09:10 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy