Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: awk append to one line if first field is the same
Top Forums Shell Programming and Scripting awk append to one line if first field is the same Post 302363004 by radoulov on Monday 19th of October 2009 06:54:29 AM
Old 10-19-2009
Quote:
Originally Posted by Franklin52
radoulov,

This line should have a comma as field separator:

Code:
END { for (k in _) print k FS _[k] }

Regards Smilie
Correct! Thank you Smilie
Actually, it could be even:

Code:
awk -F, 'END { for (k in _) print _[k] }
{ _[$1] = $1 in _ ? _[$1] FS $2 : $0 }
' infile

With Perl:

Code:
perl -F, -lane'
	push @{ $_{ $F[0] } }, $F[1];
	print map { join ",", $_, @{ $_{$_} } } keys %_
	  if eof
	' infile

Last edited by radoulov; 10-19-2009 at 08:01 AM..
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Append a field to the end of each line of a file based on searching another file.

Hi All, I have two comma separated value(CSV) files, say FileA and FileB. The contents looks like that shown below. FileA EmpNo,Name,Age,Sex, 1000,ABC,23,M, 1001,DES,24,F, ... (2 Replies)
Discussion started by: ultimate
2 Replies

2. Shell Programming and Scripting

AWK line by line instead of field by field?

I've been using a lot of awk lately for csv files. But I've been using awk for csv files that contain 32 fields per line. For the first time, I've been given a csv file that contains one field per line (13 fields in each csv file). I need to check that a specific field, or line contains a... (2 Replies)
Discussion started by: yongho
2 Replies

3. Shell Programming and Scripting

SED or AWK "append line to the previous line"

Hi, How can I remove the line beak in the following case if the line begin with the special char “;”? TEXT Text;text ;text Text;text;text I want to convert the text to: Text;text;text Text;text;text I have already tried to use... (31 Replies)
Discussion started by: research3
31 Replies

4. Shell Programming and Scripting

How to append a character to the last but one field on a specific line?

Hi Guys, I have a file like this: aaa b c d e f fsss g h i k l qqq r t h n I want: aaa b c d e f fsss g h i k l qqq r t h , n ggg p t e d u qqq i o s , k (2 Replies)
Discussion started by: npatwardhan
2 Replies

5. UNIX for Advanced & Expert Users

awk for a line that contains someting in a field

How would I do something like this when field 4 contains "John". I only want to print field 1 and 4 when when field 4 contains"John". awk -F" " '{print $1 $4} (3 Replies)
Discussion started by: cokedude
3 Replies

6. UNIX for Dummies Questions & Answers

Values with common field in same line with awk

Hi all ! I almost did it but got a small problem. input: cars red cars blue cars green truck black Wanted: cars red-blue-green truck black Attempt: gawk 'BEGIN{FS="\t"}{a = a (a?"-":"")$2; $2=a; print $1 FS $2}' input But I also got the intermediate records... (2 Replies)
Discussion started by: beca123456
2 Replies

7. UNIX for Dummies Questions & Answers

Help with awk, where line length and field position are variable

I have several questions about using awk. I'm hoping someone could lend me a hand. (I'm also hoping that my questions make sense.) I have a file that contains pipe separated data. Each line has similar data but the number of fields and the field position on each line is variable. ... (3 Replies)
Discussion started by: Cheese64
3 Replies

8. Shell Programming and Scripting

Pass awk field to a command line executed within awk

Hi, I am trying to pass awk field to a command line executed within awk (need to convert a timestamp into formatted date). All my attempts failed this far. Here's an example. It works fine with timestamp hard-codded into the command echo "1381653229 something" |awk 'BEGIN{cmd="date -d... (4 Replies)
Discussion started by: tuxer
4 Replies

9. Shell Programming and Scripting

awk to remove line if field has symbols in it

Trying to use awk to remove a line only if $1 contains either ; or :. Thje awk below runs but no lines are removed. Thank you :). awk awk '$1 !~ /;/ || $1 !~ /:/ { print }' file file AARS2;TMEM151B 1 AASS 2 ABAT 3 ABCA1 3 ABCA10 1 ABCA12 2 ABCA13 1 ABCA13:AX746840 2 ABCA2 5 (5 Replies)
Discussion started by: cmccabe
5 Replies

10. Shell Programming and Scripting

Printing string from last field of the nth line of file to start (or end) of each line (awk I think)

My file (the output of an experiment) starts off looking like this, _____________________________________________________________ Subjects incorporated to date: 001 Data file started on machine PKSHS260-05CP ********************************************************************** Subject 1,... (9 Replies)
Discussion started by: samonl
9 Replies

LEARN ABOUT OSX

perlivp

PERLIVP(1)						 Perl Programmers Reference Guide						PERLIVP(1)

NAME

       perlivp - Perl Installation Verification Procedure

SYNOPSIS

       perlivp [-p] [-v] [-h]

DESCRIPTION

       The perlivp program is set up at Perl source code build time to test the Perl version it was built under.  It can be used after running:

	   make install

       (or your platform's equivalent procedure) to verify that perl and its libraries have been installed correctly.  A correct installation is
       verified by output that looks like:

	   ok 1
	   ok 2

       etc.

OPTIONS

       -h help
	    Prints out a brief help message.

       -p print preface
	    Gives a description of each test prior to performing it.

       -v verbose
	    Gives more detailed information about each test, after it has been performed.  Note that any failed tests ought to print out some
	    extra information whether or not -v is thrown.

DIAGNOSTICS

       o   print "# Perl binary '$perlpath' does not appear executable.
";

	   Likely to occur for a perl binary that was not properly installed.  Correct by conducting a proper installation.

       o   print "# Perl version '$]' installed, expected $ivp_VERSION.
";

	   Likely to occur for a perl that was not properly installed.	Correct by conducting a proper installation.

       o   print "# Perl @INC directory '$_' does not appear to exist.
";

	   Likely to occur for a perl library tree that was not properly installed.  Correct by conducting a proper installation.

       o   print "# Needed module '$_' does not appear to be properly installed.
";

	   One of the two modules that is used by perlivp was not present in the installation.	This is a serious error since it adversely affects
	   perlivp's ability to function.  You may be able to correct this by performing a proper perl installation.

       o   print "# Required module '$_' does not appear to be properly installed.
";

	   An attempt to "eval "require $module"" failed, even though the list of extensions indicated that it should succeed.	Correct by
	   conducting a proper installation.

       o   print "# Unnecessary module 'bLuRfle' appears to be installed.
";

	   This test not coming out ok could indicate that you have in fact installed a bLuRfle.pm module or that the "eval " require
	   "$module_name.pm"; "" test may give misleading results with your installation of perl.  If yours is the latter case then please let
	   the author know.

       o   print "# file",+($#missing == 0) ? '' : 's'," missing from installation:
";

	   One or more files turned up missing according to a run of "ExtUtils::Installed -> validate()" over your installation.  Correct by
	   conducting a proper installation.

       For further information on how to conduct a proper installation consult the INSTALL file that comes with the perl source and the README
       file for your platform.

AUTHOR

       Peter Prymmer

perl v5.16.2							    2013-08-25								PERLIVP(1)
All times are GMT -4. The time now is 04:44 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy