Shell Programming and Scripting

AZ_H,NZ_K,IN_F,AZ1_A


output required
AZ_H string,
NZ_K int,
IN_F int,
AZ1_A double

code tried
tr -s ' '  '\n'<file.txt > file.tmp
sed -i -- 's/_A/double/g' * <file.tmp

awk -F, '{for(i=1;i<=NF;i++){sub(/_A$/,"& double",$i);sub(/_H$/,"& String",$i);sub(/_K$/,"& int",$i);sub(/_F$/,"& int",$i);print $i}}'  Input_file
OR
awk -F, '{for(i=1;i<=NF;i++){sub(/_A$/,"& double",$i);sub(/_H$/,"& String",$i);gsub(/_K$|_F$/,"& int",$i);print $i}}'  Input_file

AZ_H String
NZ_K int
IN_F int
AZ1_A double

awk '{sub(/_A$\n$/,"_A double",$0);sub(/_H$/,"& String",$0);sub(/_K$/,"& int",$0);sub(/_F$/,"& int",$0);} 1' RS=,   Input_file
OR
awk '{sub(/_A$\n$/,"_A double",$0);sub(/_H$/,"& String",$0);gsub(/_K$|_F$/,"& int",$0);} 1' RS=,   Input_file
OR even more smaller
awk '{sub(/_A$\n$/,"_A double");sub(/_H$/,"& String");gsub(/_K$|_F$/,"& int");} 1' RS=,  Input_file

AZ_H String
NZ_K int
IN_F int
AZ1_A double

sed -e 's/_A/& double/g' -e 's/_F/& int/g' -e 's/_H/& string/g' -e 's/_K/& int/g' -e 's/,/&\n/g'

AZ_H_AZ1
NZ_K_NZ111213_11

AZ_A_AZ1 double,
NZ_F_NZ123 int

cat  Input_file
AZ_A_AZ1,NZ_F_NZ123,AZ_H_ABD1,NZ_K_WQ1231

awk '{sub(/$\n$/,"$");gsub(/_K_.*|_F_.*/,$0" int");sub(/_H_.*/,$0" string");sub(/_A_.*/,$0" double")} 1' RS=,  Input_file

AZAZ_A_AZ1 double
NZNZ_F_NZ123 int
AZAZ_H_ABD1 string
NZNZ_K_WQ1231$ int

awk -F, '{for(i=1;i<=NF;i++){gsub(/_K_.*|_F_.*/,$i" int",$i);sub(/_H_.*/,$i" string",$i);sub(/_A_.*/,$i" double",$i);print $i}}'  Input_file

AZAZ_A_AZ1 double
NZNZ_F_NZ123 int
AZAZ_H_ABD1 string
NZNZ_K_WQ1231 int

awk '
BEGIN {
   ar["A"]="double";
   ar["F"]="int";
   ar["H"]="string";
   ar["K"]="int";
}
{
 for (i=1; i<=NF; i++) {
   split($i, av, "_");
   print $i, ar[av[2]] ((i==NF) ? "" : ",")
 }
}
' FS="," infile