Using Perl in .spec or help converting to BASH

[Aaron Lippold]

Hello,

I am building a kickstart that is fairly simple but has many
repetitive actions based on a large set of files.

I have the file sets listed in a simple text file and wrote a perl
script to simple open the file, read the line, parse the filename and
output the needed command with the right chunks of the full filename
in the right places.

I did it in perl and not bash because I am not sure how to do it well
in bash or sh etc.

I would like to just run this script and or fuction right in mz .spec
file. I cannot seem to find any data on if I can do this. Or can
someone show me a quick bash code snip for doing something like :

MYFILE
CODE/SET1/File.txt
...

install()
open file MYFILE
while (file)
# a = CODE, b = SET1, c = File d = txt
(a,b,c,d) = parse(line)
instcmd -n ="b" -f = "c.d"
end while

# in the postun section
cleandb()
open file MYFILE
while(file)
(a,b,c,d) = parse(line)
rmcmd -n = c
end while

This way I could just define the right fileset for each subpackage and
I won't have to maintain a list of 100 or more identical opperations,
just dump an ls into a file for setx-file-list.txt when I need to
rebuild the rpms for an updated set of file.

Thanks for any help, thoughts and education.


Aaron