|
|
Fetching values in CSV file based on column name
11-08-2013
$ cat Header_list.txt Field2 Field4
$ cat file Field1,Field2,Field3,Field4,Field4 abc ,123 ,xyz ,000 ,pqr mno ,123 ,dfr ,111 ,bbb
awk 'NR==FNR{
Cols=Cols (Cols?"|":"")$1
next
}
FNR==1{
for (i=1;i<=NF;i++)
if (match($i,Cols))
Ar[++n]=i
}
{
for (i=1;i<=n;i++)
printf (i<n)? $(Ar[i]) FS : $(Ar[i])
printf "\n"
}' FS="," Header_list.txt fileField2 ,Field4, Field4 123, 000, pqr 123, 111, bbb
Akshay :Field4, Field2 pqr,123
awk '
NR==1 {
for (i=1;i<=NF;i++) {
if ($i==SEARCHHDR) {
srchfld=i;
}
if ($i==OUTHDR) {
outfld=i;
}
}
print $srchfld OFS $outfld
}
NR>1 && $srchfld ~ SEARCHVAL {
print $srchfld OFS $outfld
}
' SEARCHHDR="Field2" SEARCHVAL="123" OUTHDR="Field4" FS=, OFS=, file
11-08-2013
$ cat file Field1,Field2,Field3,Field4,Field4 abc ,123 ,xyz ,000 ,pqr mno ,123 ,dfr ,111 ,bbb
awk '
NR==1{
for (i=1;i<=NF;i++)
{
s=(match(tolower($i),tolower(Header_to_Search)))?i:s
if(match(tolower($i),tolower(Column_to_print)))
Ar[++n]=i
}
}
NR==1 || $s~Search_value{
printf $s FS
for(i=1;i<=n;i++)
printf (i<n)? $(Ar[i]) FS : $(Ar[i])
printf "\n"
}
' FS="," Header_to_Search="Field1" Search_value="abc" Column_to_print="Field2|Field3" fileField1,Field2,Field3 abc ,123 ,xyz
11-08-2013
|
|
|
|