Analizuoja failo raidžių statistika programa
5 (100%) 1 vote

Analizuoja failo raidžių statistika programa

#!/bin/bash

DIALOG=${DIALOG=dialog}

declare -a lines

declare -a simboliai

declare -a skaicius

declare -a skirtukai

declare -a skirtuku

E_BADARGS=65

let i=0

let a=0

skirtukai=“, „

#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

print ()

{

le=${#simboliai[*]}

sk=0

echo “ File: ‘$FILE’ stats“

echo “ ~~~~~~~~~~~~~~~~~~~~~~~~~~“

echo

echo

echo

echo „———————–“

echo „|SIMBOLIS | DAZNUMAS“

echo „———————–“

filename=$OUTFILE

echo „File: ‘$FILE’ stats“ > $filename

while [ $sk -lt $le ]

do

echo „|${simboliai[sk]} | ${skaicius[sk]}“ >> $filename

echo „|${simboliai[sk]} | ${skaicius[sk]}“

let sk=sk+1

done

echo „———————–“

}

#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

clear ()

{

let index=0

while [ $index -lt 50 ]

do

echo

let index=index+1

done

}

#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

split ()

{

nz=0

splitLength=${#skirtukai}

echo „SKIRTUKAI: $skirtukai“

echo „Skirtuku skaicius: $splitLength“

while [ $nz -lt $splitLength ]

do

skirtuku[nz]=${skirtukai:$nz:1}

echo „$nz ————- ${skirtuku[nz]}“

let nz=nz+1

done

skirtuku[nz]=““

}

#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Help ()

{

$DIALOG –title „HELP“ –clear

–yesno “ Pasirinkite viena is meniu punktu n Iveskite ivedimo failo pavadinima n Iveskite isvedimo failo pavadinima n Created by Nerijus Kliauba n Lotynisku raidziu statistika nnn Continue?“ 20 60

case $? in

0) ;;

1)

exit $?;;

esac

}

#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Count ()

{

split;

exec 3< „$FILE“

while read curline <&3; do

if [ -z „$curline“ -o „${curline:0:1}“ = „#“ ]; then continue; fi

lines=(„${lines[@]}“ „$curline“)

lineLength=${#lines[i]}

line=${lines[i]}

x=0

le=0

while [ $x -lt $lineLength ]

do

ind=0

hi=${#skirtuku[*]}

le=${#simboliai[*]}

sk=0

tikrinti=0

pass=0

Šiuo metu Jūs matote 50% šio straipsnio.
Matomi 197 žodžiai iš 393 žodžių.
Peržiūrėkite iki 100 straipsnių per 24 val. Pasirinkite apmokėjimo būdą:
El. bankininkyste - 1,45 Eur.
Įveskite savo el. paštą (juo išsiųsime atrakinimo kodą) ir spauskite Tęsti.
SMS žinute - 2,90 Eur.
Siųskite sms numeriu 1337 su tekstu INFO MEDIA ir įveskite gautą atrakinimo kodą.
Turite atrakinimo kodą?
Po mokėjimo iškart gausite atrakinimo kodą, kurį įveskite į laukelį žemiau:
Kodas suteikia galimybę atrakinti iki 100 straispnių svetainėje ir galioja 24 val.