Rejstrik (index)

Ladislav Dobias dobias at labe.felk.cvut.cz
Thu Nov 8 11:27:46 CET 2001


Dobry den,

On Thu, 8 Nov 2001, Miroslav BALDA wrote:

> 1. doporucovany povel >>cat<< nemam k dispozici, protoze
> pracuji pod Windows 2000. Podobne je to s programen
> >>detex<<, ktery je k dispozici rovnez pro Linux. Alespon
> jsem jinou verzi na CTAN nenasel.

Program "detex", "dvispell", popr. "dvi2tty" je vhodny pro
predzpracovani, neni vsak nutny (pokud vam nevadi, ze ve
vypisu slov budou i jmena maker).

"cat" neni potreba, ten jen vypisuje soubor - neco jako type
v DOSu. Staci presmerovani. Problem asi bude spise s programy
'tr', 'sort'...

Tyto vsechny programy by podle mne (nemam Windows), mely
byt v baliku CYGWIN (viz http://www.cygwin.com/) a nebo
DJGPP, coz jsou GNU programy pro Windows, resp. pro DOS
(vcetne bash, cat, tr, sort, ale i prekladace gcc... :-)

Nebo pokud mate Perl, tak muzete pouzit jednoduchy
programek:

==== cut here ====
#! /usr/bin/perl
# slova.pl
# Spocte pocet vyskytu slov a vytiskne to od nejvyssiho vyskytu
# 2000 Ladislav Dobias, xdobiasl at fel.cvut.cz
use locale;

while (<>) {
  chop;
  # nahradime znaky, ktere nejsou [A-Za-z0-9_] mezerou:
  s/\W+/ /g;
  $_=lc;
  split;
  foreach $_ (@_) {
    $i{$_}++;
  }
}

foreach $_ (sort {$i{$b} <=> $i{$a} } keys %i) {
  printf "%3i %s\n",$i{$_},$_;
}
==== cut here ====

Ale stejne si myslim, ze slova pro rejstrik je asi nejlepsi
oznacovat ihned, kdyz je pisete... (i kdyz to nevim z praxe,
protoze jsem jeste v zivote nedelal rejstrik :-)

Zdravi
Lada Dobias

--

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
                                                      ,v
  ##       ##   #####   #####            Ladislav DOBIAS
  ##      ####  ##  ## ##O-O##         xdobiasl at fel.cvut.cz
  ##     ##  ## ##  ## ## > ##   <http://cs.felk.cvut.cz/~xdobiasl/>
  ##     ###### ##  ## ## v ##      I'm a Ph.D. student on Czech
  ###### ##  ## #####   #####           Technical University
                                   Interests: AI, music, TeX, Unix
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%





More information about the csTeX mailing list