Shell Programming and Scripting

$ ./fator.sh 1 2 3 4
1 2 3 4
No of arguments: 4
length of array is: 4
k[0] = 1
a[0] =
k[1] = 2
a[1] = 2
k[2] = 3
a[2] =
k[3] = 4
a[3] =

$

a=("${a[$i]}" "$(fator ${k[$i]})")

#!/bin/bash
fator() {
  ((j=$1+1))
  z=1
  f=0
  for (( p = 1; $p < $j; p++ )) {
    ((f=j-p))
    ((z=z*f))
  }
  echo "$z"
}
 
k=("$@")
echo ${k[*]}
echo "No of arguments: $#"
echo "length of array is: ${#k[*]}"
for ((i=0;i<${#k[*]};i++)) {
   echo "k[$i] = ${k[i]}"
   a[i]="$(fator ${k[i]})"
   echo "a[$i] = ${a[i]}"
}
echo ""

#!/bin/bash
# program for file renaming
echo "Enter path: "
read p # pattern should be *.txt, *.pdf or simply *
a=($p)

for (( i = 0; i < ${#a[*]}; i++ ))
do
echo "a[$i] = ${a[$i]}"
done

echo "Enter the file format: "
read f   # can be given as txt or pdf

for (( i = 0; i < ${#a[*]}; i++ ))
do
for (( ${a[$i]} != "frn2c" ))
do
v[$i]=("$(cat ${a[$i]} | sed 's/\(.\)/\1 \n/g')")
echo ${v[$i]}
c[$i]=("$(mv ${v[$i]} ${v[$i]}.$f)")
echo ${c[$i]}
done
done

for (( ${a[$i]} != "frn2c" ))

./frn2c: line 17: syntax error: arithmetic expression required
./frn2c: line 17: syntax error: `(( ${a[$i]} != "frn2c" ))

#!/bin/bash
# program for data mining

echo "This programs read text files and brings out the"
echo "word count of first 50 most used words in a file."

a=(*.txt)

for (( i = 0; i < ${#a[*]}; i++ ))
do
echo "a[$i] = ${a[$i]}"
done
echo ""


for (( i = 0; i < ${#a[*]}; i++ ))
do
printf "=======================" >> lsf2dout.txt
printf "\n" >> lsf2dout.txt
printf "Name of the file: ${a[$i]}" >> lsf2dout.txt
printf "\n" >> lsf2dout.txt

cat ${a[$i]} | sed 's/\([[:space:]]\)/\1 \n/g' | sed 's/^[ \t]*//' | sed \
's/[ \t]*$//' | sed '/^$/d' | sed 's/^to$//g' | sed 's/^of$//g' | sed \
's/^and$//g' | sed 's/^a$//g' | sed 's/^the$//g' | sed \
's/^The$//g' | sed 's/^is$//g' | sed 's/^in$//g' | sed 's/^as$//g' | sed \
's/^for$//g' | sed 's/^by$//g' | sed 's/^on$//g' | sed 's/^at$//g' | sed \
's/^be$//g' | sed 's/^an$//g'|sed 's/^it$//g' | sed 's/^no$//g' | sed 's/^It$//g' | sed \
's/^us$//g' | sed 's/^are$//g' | sed 's/^was$//g' | sed 's/^up$//g' | tr \
-cd '[:alnum:] [:space:]'| sort | uniq -c | sort \
-nr | head -n 50 >> lsf2dout.txt

printf "\n\n" >> lsf2dout.txt
done

#!/bin/bash
# program for data mining

echo "This programs read text files and brings out the"
echo "word count of first 50 most used words in a file."

a=(*.txt)

for (( i = 0; i < ${#a[*]}; i++ ))
do
echo "a[$i] = ${a[$i]}"
done
echo ""


for (( i = 0; i < ${#a[*]}; i++ ))
do
printf "=======================" >> lsf2dout.txt
printf "\n" >> lsf2dout.txt
printf "Name of the file: ${a[$i]}" >> lsf2dout.txt
printf "\n" >> lsf2dout.txt

cat ${a[$i]} | sed 's/\([[:space:]]\)/\1 \n/g' | sed 's/^[ \t]*//' | sed \
's/[ \t]*$//' | sed '/^$/d' | 
for (( i = 0; $i <= ${#g[*]}; i++ )) 
do 
sed 's/^${g[$i]}$//g'
done | tr -cd '[:alnum:] [:space:]'| sort | uniq -c | sort -nr | head -n 50 >> lsf2dout.txt

printf "\n\n" >> lsf2dout.txt
done


declare -a g=('and' 'us' 'the' 'The' 'we' 'is' 'a' 'at' 'to' 'of' 'is' 'in' 'as' 'be' 'for' 'by' 'on' 'us' 'are' 'was' 'up')