Login or Register to Ask a Question and Join Our Community


Shell Programming and Scripting

Perl script to change values in datafiles

Login to Discuss or Reply to this Discussion in Our Community

 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting Perl script to change values in datafiles
# 8  
Old 08-10-2010
Hi Guru n everybody

I have problem where the script also change the values of other unrelated fields as below :

Source file :
Code:
Kitten
Dogs
Donkey
Chicken
Turkey

Destination file :
Code:
Kitten, 0
Dogs, 0
Donkey, 0
Chicken, 0
Turkey, 0
Goat, 0
Camel, 0
Wombat, 0
Kitten, 0
Dogs, 0
Donkey, 0
Chicken, 0
Turkey, 0
Goat, 0
Camel, 0
Wombat, 0
Kitten, 0
Dogs, 0
Donkey, 0
Chicken, 0
Turkey, 0
Goat, 0
Camel, 0
Wombat, 0

After the script was runned the destination file become like this :

Destination file :
Code:
Kitten, 1
Dogs, 2
Donkey, 3
Chicken, 4
Turkey, 5
Goat, 
Camel, 
Wombat, 
Kitten, 1
Dogs, 2
Donkey, 3
Chicken, 4
Turkey, 5
Goat, 
Camel, 
Wombat, 
Kitten, 1
Dogs, 2
Donkey, 3
Chicken, 4
Turkey, 5
Goat, 
Camel, 
Wombat,

How do I get Goat, Camel and Wombat to maintain their original values 0 and not being null? Example:
Code:
Kitten, 1
Dogs, 2
Donkey, 3
Chicken, 4
Turkey, 5
Goat, 0
Camel, 0
Wombat, 0 
Kitten, 1
Dogs, 2
Donkey, 3
Chicken, 4
Turkey, 5
Goat, 0
Camel, 0
Wombat, 0 
Kitten, 1
Dogs, 2
Donkey, 3
Chicken, 4
Turkey, 5
Goat, 0
Camel, 0
Wombat, 0


Thanks
Last edited by Scott; 08-10-2010 at 06:54 AM.. Reason: Code tags, please...
# 9  
Old 08-10-2010
Hi

Code:
#awk 'NR==FNR{a[$1]=i++;next}{print $1,(a[$1])?a[$1]:$2}' FS=, OFS=, i=1 a1 a2 > a2_
#mv -f a2_ a2

Guru.
# 10  
Old 08-10-2010
Hi Guru,

It's not working Smilie..
It is still showing null values to
Goat,
Camel,
Wombat,
# 11  
Old 08-10-2010
Hi

Make sure the files a1 and a2 are brought to their previous states before running the commands. Other than that, I dont see any reason.

Guru
This User Gave Thanks to guruprasadpr For This Post:
luna_soleil
# 12  
Old 08-10-2010
Thanks Guru..

this is what i did to the script :
Code:
echo "Enter filename that you want to modify"
read destfile
nawk 'NR==FNR{a[$1]=i++;next}{print $1, (a[$1])?a[$1]:$2}' FS=," " OFS=," " i=240000 source.txt $destfile > tempfile
mv -f tempfile $destfile


My source file is :
Code:
edited, confidential datafile

Actually my destination file (original) was looking like this :
Code:
edited, confidential datafile

After running the script above, I'm getting this:
Code:
edited, confidential datafile

Which is correct when changing the fields values, but how do I get rid of the "," behind
Code:
edited, confidential datafile

etc?
Last edited by luna_soleil; 08-19-2010 at 05:18 AM.. Reason: Code tags, please...
# 13  
Old 08-10-2010
Hi

The sample file you provided is different from your actual file.

Try this:

Code:
#awk 'NR==FNR{a[$1]=i++;next}NF>1{print $1,(a[$1])?a[$1]:$2;next}1' FS=, OFS=, i=1 a1 a2 > a2_
#mv -f a2_ a2

Guru.
This User Gave Thanks to guruprasadpr For This Post:
luna_soleil
# 14  
Old 08-10-2010
Guru,
That works! Smilie
Thank you so much for helping me!Smilie
U are a real genius! SmilieSmilie
Login or Register to Ask a Question

Previous Thread | Next Thread

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Change values in .conf file with a script

This is my first time posting here...so be gentle. Suppose I have a test.conf file that contains a value such as a IP. I would like to be able to use the Dialog Utility in Linux to allow me to enter the new IP in a Dialog form...and the results get saved into the test.conf file in the place... (4 Replies)
Discussion started by: calahanp
4 Replies

2. Shell Programming and Scripting

Perl script to change the date in some scenario

Hi , I have file FSN.log which contains number 100. i have other Perl script when i run it , it ll increment this FSN.log value. now my requirement is when the count in FSN.log becomes 999, it should make the value to 100 again and Perl script to change the date or it should make the date... (2 Replies)
Discussion started by: santhoshks
2 Replies

3. Shell Programming and Scripting

Change value in a file using perl or shell script

hi, I have a local.conf file which has the first line TOPDIR = "/home/mvdev/workspace/boxer". I want to replace the value to "/home/common/workspace/mirror". I tried the following perl command that is perl -p -i -e 's/Path/path1/g' myfile.txt then sed... (7 Replies)
Discussion started by: amvarma77
7 Replies

4. Shell Programming and Scripting

Passing PERL var values to SH Shell Script

Greetings all, If I have a SH script that calls a PERL script in the following way: perl $HOME/scripts/config.properties And in the config.properties PERL file, this Perl script only sets a number of environmental parameters in the following way: #!/usr/bin/perl $VAR1 = ( ... (3 Replies)
Discussion started by: gikyo12
3 Replies

5. Shell Programming and Scripting

(Perl or Unix) Script to get values from two files?

Hello, I am working on a script to get values from 2 files, and write to a new result file. File 1: 8-columned file separated by space: SerialNumber-Abc123 ID-1234:0 Name-xxx Class-yyy Object-zzz Source-aaa Value-bbb Comments-ccc SerialNumber-Abc124 ID-1234:1 Name-xxx Class-yyy... (1 Reply)
Discussion started by: ad23
1 Replies

6. Shell Programming and Scripting

Change values in Log4j.xml using ksh script

Hi, I am new to UNIX and shell scripting. I have to create a shell script(ksh) which parses log4j.xml file for a given webservice name and change the corresponding value from INFO to DEBUG or vice-versa. My log4j.xml looks like:- <!-- Appender WEBSERVICENAME--> <appender... (3 Replies)
Discussion started by: sanjeevcseng
3 Replies

7. Shell Programming and Scripting

How to change values in certain column only in every line (any script)

Let say in a file I have lines of data like this : 13;2073;461496;15075341;3;001f7d3a;2042063674; 13;2074;461446;15080241;6;001ed33a;2042020154; 13;2075;461401;15085270;6;001f593b;2042054459; 13;2076;461381;15087160;6;001f7483;2042061443; 13;2077;461419;15083419;6;001eca1a;2042017818; I... (3 Replies)
Discussion started by: luna_soleil
3 Replies

8. Shell Programming and Scripting

perl script to print to values in rows and columns

Hi guys I want to print the values by using this script but its giving the no of rows and columns as input instead of values Would you plz help me on this FILE- chr1.txt 1981 1 1971 1 1961 1 1941 1 perl script #!/usr/bin/perl -w $infile1 = 'chr1.txt'; $outfile3 = 'out3.txt'; ... (3 Replies)
Discussion started by: nogu0001
3 Replies

9. Shell Programming and Scripting

How to change a directory on windows via perl script

How to change a directory on windows via perl script. I wanna mount a share on windows via perl script. I have used:- system("dir"); gives the list of directories in the drive i am.This command works well. Now i want to move from c drive to z drive via perl script.I am using:- ... (2 Replies)
Discussion started by: TRUPTI
2 Replies

10. Shell Programming and Scripting

how to change "set" values in perl, windows...

i am using perl in win2000advanced server... --------------------------- perl -version: --------------------------- This is perl, v5.6.1 built for MSWin32-x86-multi-thread (with 1 registered patch, see perl -V for more detail) Copyright 1987-2001, Larry Wall Binary build 638 provided by... (1 Reply)
Discussion started by: sekar sundaram
1 Replies
Login or Register to Ask a Question