Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Help with perl script.
Top Forums Programming Help with perl script. Post 302565187 by veerubiji on Monday 17th of October 2011 07:47:16 AM
Old 10-17-2011
Hi,
sorry i am getting errors while running above code my errors are like this
Code:
 
1)" my variable $file masks earlier declaration in same statement at line "
my $reader = XML::LibXML::reader->new(IO=>$file).
2)syntax error at
  "foreach $file glob("*.xml").

.
i have one doubt where should i have to given the folder name and also where shold i end for loop.
finally glob function gives only .xml files in the current directory. but in my problem i need to search one folder that contains many sub folder in that subfolder i have .c and .h and .xml files, i need to find .xml files and extract some information.
Last edited by veerubiji; 10-17-2011 at 11:03 AM..
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl: Run perl script in the current process

I have a question regarding running perl in the current process. I shall demonstrate with an example. Look at this. sh-2.05b$ pwd /tmp sh-2.05b$ cat test.sh #! /bin/sh cd /etc sh-2.05b$ ./test.sh sh-2.05b$ pwd /tmp sh-2.05b$ . ./test.sh sh-2.05b$ pwd /etc sh-2.05b$ So... (10 Replies)
Discussion started by: vino
10 Replies

2. Shell Programming and Scripting

[Perl] Accessing array elements within a sed command in Perl script

I am trying to use a script to replace the header of each file, whose filename are stored within the array $test, using the sed command within a Perl script as follows: $count = 0; while ( $count < $#test ) { `sed -e 's/BIOGRF 321/BIOGRF 332/g' ${test} > 0`; `cat 0 >... (2 Replies)
Discussion started by: userix
2 Replies

3. Shell Programming and Scripting

perl/unix: script in command line works but not in perl

so in unix this command works works and shows me a list of directories find . -name \*.xls -exec dirname {} \; | sort -u | > list.txt but when i try running a perl script to run this command my $query = 'find . -name \*.xls -exec dirname {} \; | sort -u | > list.txt';... (2 Replies)
Discussion started by: kpddong
2 Replies

4. Shell Programming and Scripting

Perl :How to print the o/p of a Perl script on console and redirecting same in log file @ same time.

How can i print the output of a perl script on a unix console and redirect the same in a log file under same directory simultaneously ? Like in Shell script, we use tee, is there anything in Perl or any other option ? (2 Replies)
Discussion started by: butterfly20
2 Replies

5. Shell Programming and Scripting

HELP on Perl array / sorting - trying to convert Korn Shell Script to Perl

Hi all, Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM. Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers. At the moment am... (3 Replies)
Discussion started by: newbie_01
3 Replies

6. Shell Programming and Scripting

calling a perl script with arguments from a parent perl script

I am trying to run a perl script which needs input arguments from a parent perl script, but doesn't seem to work. Appreciate your help in this regard. From parent.pl $input1=123; $input2=abc; I tried calling it with system("/usr/bin/perl child.pl $input1 $input2"); and `perl... (1 Reply)
Discussion started by: grajp002
1 Replies

7. Shell Programming and Scripting

executing perl script from another perl script : NOT WORKING

Hi Folks, I have 2 perl scripts and I need to execute 2nd perl script from the 1st perl script in WINDOWS. In the 1st perl script that I had, I am calling the 2nd script main.pl =========== print "This is my main script\n"; `perl C:\\Users\\sripathg\\Desktop\\scripts\\hi.pl`; ... (3 Replies)
Discussion started by: giridhar276
3 Replies

8. Shell Programming and Scripting

Perl : embedding java script with cgi perl script

Hi All, I am aware that html tags can be embedded in cgi script as below.. In the same way is it possible to embed the below javascript in perl cgi script ?? print("<form action="action.htm" method="post" onSubmit="return submitForm(this.Submitbutton)">"); print("<input type = "text"... (1 Reply)
Discussion started by: scriptscript
1 Replies

9. Shell Programming and Scripting

Excuting perl script from within a perl script with variables.

Not sure what I am doing wrong here, but I can print the list with no issue. Just a blank screen with the 'do'. #!/usr/bin/perl open FILE, "upslist.txt"; while ($line=<FILE>){ if ($line=~/^(.*?),(.*?)$/){ #print "ups:$1 string:$2\n"; do 'check_snmp_mgeups-0.1.pl -H $1 -C $2'; } ... (1 Reply)
Discussion started by: mrlayance
1 Replies

10. Programming

PERL: In a perl-scripttTrying to execute another perl-script that SETS SOME VARIABLES !

I have reviewed many examples on-line about running another process (either PERL or shell command or a program), but do not find any usefull for my needs way. (Reviewed and not useful the system(), 'back ticks', exec() and open()) I would like to run another PERL-script from first one, not... (1 Reply)
Discussion started by: alex_5161
1 Replies

LEARN ABOUT SUSE

crm_diff

CRM_DIFF(8)							  [FIXME: manual]						       CRM_DIFF(8)

NAME

       crm_diff - identify changes to the cluster configuration and apply patches to the configuration files

SYNOPSIS

	   crm_diff [-?|-V] [-o filename] [-O string] [-p filename] [-n filename] [-N string]

DESCRIPTION

       The crm_diff command assists in creating and applying XML patches. This can be useful for visualizing the changes between two versions of
       the cluster configuration or saving changes so they can be applied at a later time using cibadmin.

OPTIONS

       --help, -?
	   Print a help message.

       --original filename, -o filename
	   Specify the original file against which to diff or apply patches.

       --new filename, -n filename
	   Specify the name of the new file.

       --original-string string, -O string
	   Specify the original string against which to diff or apply patches.

       --new-string string, -N string
	   Specify the new string.

       --patch filename, -p filename
	   Apply a patch to the original XML. Always use with -o.

       --cib, -c
	   Compare or patch the inputs as a CIB. Always specify the base version with -o and provide either the patch file or the second version
	   with -p or -n, respectively.

       --stdin, -s
	   Read the inputs from stdin.

EXAMPLES

       Use crm_diff to determine the differences between various CIB configuration files and to create patches. By means of patches, easily reuse
       configuration parts without having to use the cibadmin command on every single one of them.

	1. Obtain the two different configuration files by running cibadmin on the two cluster setups to compare:

	       cibadmin -Q > cib1.xml
	       cibadmin -Q > cib2.xml

	2. Determine whether to diff the entire files against each other or compare just a subset of the configurations.

	3. To print the difference between the files to stdout, use the following command:

	       crm_diff -o cib1.xml -n cib2.xml

	4. To print the difference between the files to a file and create a patch, use the following command:

	       crm_diff -o cib1.xml -n cib2.xml > patch.xml

	5. Apply the patch to the original file:

	       crm_diff -o cib1.xml -p patch.xml

FILES

       /var/lib/heartbeat/crm/cib.xml--the CIB (minus status section) on disk. Editing this file directly is strongly discouraged.

SEE ALSO

       ???

AUTHOR

       crm_diff was written by Andrew Beekhof.

[FIXME: source] 						    07/05/2010							       CRM_DIFF(8)
All times are GMT -4. The time now is 02:29 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy