Re: Extracting sections from code files

[fatiparty]

Nov 3, 2021, 17:39 by celvidge001@gmail.com:

> On 03/11/2021 03:51 pm, fatiparty--- via wrote:
>
>> ## Mode: org
>> #  Assigns shell positional parameters or changes the values of shell
>> #  options.  The -- option assigns the positional parameters to the
>> #  arguments of {set}, even when some of them start with an option
>> #  prefix `-'.
>> ## # End of org
>>
>> ;; Mode: org
>> ;  Assigns shell positional parameters or changes the values of shell
>> ;  options.  The -- option assigns the positional parameters to the
>> ;  arguments of {set}, even when some of them start with an option
>> ;  prefix `-'.
>> ;; # End of org
>>
>> @c Mode: org
>> @c Assigns shell positional parameters or changes the values of shell
>> @c options.  The -- option assigns the positional parameters to the
>> @c arguments of {set}, even when some of them start with an option
>> @c prefix `-'.
>> @c # End of org
>>
>
> grep -v 'org$' testfile | cut -c4-
>
> -- 
> Chris Elvidge
> England
>

Have updated the bash function to use a single pattern charcl.  But the 
comments are not being removed. 

capture ()
{
local efile="$1"

local begrec endrec charcl

charcl='^[[:space:]]*([#;!]+|@c|\/\/)[[:space:]]*'
begrec="${charcl}"'Mode: rec$'
endrec="${charcl}"'# End of rec$'

awk -v ccls="$charcl" -v bego="$begorg" -v endo="$endorg" \
   '$0 ~ bego { found=1; next }
    $0 ~ endo { found=0; }
    found { sub(/ccls/,""); print }' "$efile"
}