Обработать файл

cat file | perl -e 'while (<>) { /(\d+),(\w+)/; $ec{$2}+=$1; } foreach(keys %ec) { print "$ec{$_},$_\n" };'

#!/bin/sh
IN=/tmp/in

LINES=`wc -l $IN`
LINES=${LINES/ */}


LINE=`sed -n 1p $IN`
NUM_PREV=${LINE/,*/}
STR_PREV=${LINE/*,/}

for i in `seq 2 $LINES` 
do 
  LINE=`sed -n ${i}p $IN`
  NUM_CUR=${LINE/,*/}
  STR_CUR=${LINE/*,/}
  if [ ${STR_CUR} = ${STR_PREV} ]
  then
    NUM_PREV=$((${NUM_PREV} + ${NUM_CUR}))
  else
    echo ${NUM_PREV},${STR_PREV}
    NUM_PREV=${LINE/,*/}
    STR_PREV=${LINE/*,/}
  fi
done
echo ${NUM_PREV},${STR_PREV}

123,abcdf
100,abcdf
200,abcdf
100,xyzf

IN=/tmp/in

$./sc.sh 
423,abcdf
100,xyzf

$ cat test
123,abcdf
100,abcdf
200,abcdf
100,xyzf
$ cat test | perl -e 'while (<>) { /(\d+),(\w+)/; $ec{$2}+=$1; } foreach(keys %ec) { print "$ec{$_},$_\n" };'
423,abcdf
100,xyzf

#!/bin/bash
##VAR DETERMINATION
input=./test.csv #input file
str_count=`cat $input|wc -l` #string counter
##Arrays of data
array_col_0=(`cat $input|awk -F , ' {print $1}'`)
array_col_1=(`cat $input|awk -F , ' {print $2}'`)
array_col_2=(`cat $input|awk -F , ' {print $3}'`)
array_col_3=(`cat $input|awk -F , ' {print $4}'`)
for i in `seq 0 $[ $str_count - 1 ]`; do

if [ "${array_col_1[$i]}" == "${array_col_1[$i+1]}" ] && [ "${array_col_2[$i]}" == "${array_col_2[$i+1]}" ] && [ "${array_col_3[$i]}" == "${array_col_3[$i+1]}" ]
then
echo "We got some matches here, yeah!"
else echo "no matches"
fi
done

if [ "${array_col_1[$i]}" == "${array_col_1[$i+1]}" ] && [ "${array_col_2[$i]}" == "${array_col_2[$i+1]}" ] && [ "${array_col_3[$i]}" == "${array_col_3[$i+1]}" ]

#!/bin/bash

function data() {
cat <<EOF
123,ab,cd,f
100,ab,cd,f
200,abc,d,f
100,x,y,zf
EOF
}

data | awk -F, '{
  n=sprintf("%s,%s,%s",$2,$3,$4);
  M[n]+=$1
}
END{for(k in M) printf "%i,%s\n",M[k],k }'

#!/usr/bin/python3

val={}
for line in open('data.csv'):
	n, key = line.strip().split(',', 1)
	val[key] = int(n) + val.get(key, 0)
	
for key, n in val.items():
	print(str(n) + ',' + key)