{"id":12065,"date":"2022-09-29T12:26:06","date_gmt":"2022-09-29T06:56:06","guid":{"rendered":"https:\/\/jassweb.com\/solved\/solved-add-an-exclude-array-to-an-existing-awk-code\/"},"modified":"2022-09-29T12:26:06","modified_gmt":"2022-09-29T06:56:06","slug":"solved-add-an-exclude-array-to-an-existing-awk-code","status":"publish","type":"post","link":"https:\/\/jassweb.com\/solved\/solved-add-an-exclude-array-to-an-existing-awk-code\/","title":{"rendered":"[Solved] Add an exclude array to an existing awk code"},"content":{"rendered":"

[ad_1]
\n<\/p>\n

\n
\n
<\/div>\n
\n
\n

EDIT:<\/em><\/strong> OP told there could be words like \"a\"<\/code> too so handle that case adding following now.<\/p>\n

awk '\nBEGIN{\n  s1=\"\\\"\"\n  num=split(\"McCartney feat. vs. CD USA NYC\",array,\" \")\n  for(k=1;k<=num;k++){\n     temp=tolower(array[k])\n     ignoreLetters[temp]=array[k]\n  }\n  num=split(\"a the to at in on with and but or\",array,\" \")\n  for(i=1;i<=num;i++){\n    smallLetters[array[i]]=array[i]\n  }\n}\n\/TITLE\/{\n  for(i=2;i<=NF;i++){\n    front=end=nothing=both=\"\"\n    if($i~\/^\"\/ && $i!~\/\"$\/){\n      temp=tolower(substr($i,2))\n      front=1\n    }\n    else if($i ~ \/^\".*\"$\/){\n      temp=tolower(substr($i,2,length($i)-2))\n      both=1\n    }\n    else if($i ~\/\"$\/ && $i!~\/^\"\/){\n      temp=tolower(substr($i,1,length($i)-1))\n      end=1\n    }\n    else{\n      temp=tolower($i)\n      nothing=1\n    }\n    if(temp in ignoreLetters){\n      if(front){\n         $i=s1 ignoreLetters[temp]\n      }\n      else if(end){\n         $i=ignoreLetters[temp] s1\n      }\n      else if(both){\n         $i=s1 ignoreLetters[temp] s1\n      }\n      else if(nothing){\n         $i=ignoreLetters[temp]\n      }\n    }\n    else if(temp in smallLetters){\n      if(front){\n         $i=s1 smallLetters[temp]\n      }\n      else if(end){\n         $i=smallLetters[temp] s1\n      }\n      else if(nothing){\n         $i=smallLetters[temp]\n      }\n      else if(both){\n         $i=s1 smallLetters[temp] s1\n      }\n    }\n    else{\n      if($i~\/^\\\"\/){\n        $i=substr($i,1,1) toupper(substr($i,2,1)) substr($i,3)\n      }\n      else{\n        $i=toupper(substr($i,1,1)) substr($i,2)\n      }\n    }\n  }\n}\n1\n'  Input_file\n<\/code><\/pre>\n
\n
\n
Could you please try following.<\/p>\n
awk '\nBEGIN{\n  s1=\"\\\"\"\n  num=split(\"McCartney feat. vs. CD USA NYC\",array,\" \")\n  for(k=1;k<=num;k++){\n     temp=tolower(array[k])\n     ignoreLetters[temp]=array[k]\n  }\n  num=split(\"a the to at in on with and but or\",array,\" \")\n  for(i=1;i<=num;i++){\n    smallLetters[array[i]]=array[i]\n  }\n}\n\/TITLE\/{\n  for(i=2;i<=NF;i++){\n    front=end=nothing=\"\"\n    if($i~\/^\"\/){\n      temp=tolower(substr($i,2))\n      front=1\n    }\n    else if($i ~\/\"$\/){\n      temp=tolower(substr($i,1,length($i)-1))\n      end=1\n    }\n    else{\n      temp=tolower($i)\n      nothing=1\n    }\n    if(temp in ignoreLetters){\n      if(front){\n         $i=s1 ignoreLetters[temp]\n      }\n      else if(end){\n         $i=ignoreLetters[temp] s1\n      }\n      else if(nothing){\n         $i=ignoreLetters[temp]\n      }\n    }\n    else if(tolower($i) in smallLetters){\n      $i=tolower(substr($i,1,1)) substr($i,2)\n    }\n    else{\n      if($i~\/^\\\"\/){\n        $i=substr($i,1,1) toupper(substr($i,2,1)) substr($i,3)\n      }\n      else{\n        $i=toupper(substr($i,1,1)) substr($i,2)\n      }\n    }\n  }\n}\n1\n'  Input_file\n<\/code><\/pre>\n
Output will be as follows:<\/p>\n
FILE \"Two The Beatles Songs.wav\" WAVE\n  TRACK 01 AUDIO\nTITLE \"Dig a Pony, feat. Paul McCartney\"\n    PERFORMER \"The Beatles\"\n    INDEX 01 00:00:00\n  TRACK 02 AUDIO\nTITLE \"From Me to You\"\n    PERFORMER \"The Beatles\"\n    INDEX 01 03:58:02\n<\/code><\/pre>\n
What does code take care of:<\/em><\/strong><\/p>\n