generere ordliste

Det er meget nemt i Unix (Linux). Kører du det?

nej, WinXP

jeg har et program der kan gøre det. Er det det du leder efter?

lalledenby> hvad som helst bare det virker ;-)

Du har heller ikke Perl installeret på din WinXP ?

erikjacobsen> nej desværre.

jeg har sendt den til din mail... :P

stærkt!

lalledenby> jeg er vist nødt til at have en smule instruktion. hvad gør jeg med filen (pp.com)? Jeg har forsøgt bare at køre den, men det virker ikke.

lalledenby> OK jeg fandt ud at køre den i Dos prompten. Men den laver kun en ren word-split af teksten, dvs. den nøjes ikke med hvert ord én gang. + den udelader danske bogstaver (æ, ø, å). Hvordan får jeg den i det mindste til at nøjes med hvert ord én gang i listen?

så vidt jeg kan se erstatter programmet blot mellemrum med ny linje, og det er ikke det jeg har brug for. Jeg skal have noget der skriver en liste over tekstfilens ord, men uden at gentage dem.

Det fylder ca. så meget i Perl:

while (<>) {
  split /[^a-zA-ZæøåÆØÅ]+/;
  while ($a=pop(@_)) {
    $tab{$a}++;
  }
}

foreach $k (sort (keys %tab)) {
  print "$k\n";
}

erikjacobsen> jeg kender ikke Perl, men ved da at det er beslægtet med både php og javascript. Jeg tænkte også at jeg med både php og javascript måtte kunne lave en funtion der kan gøre det. Den skal splitte teksten ved hvert mellem rum eller linjeskift, lave et array af alle ord der således er splittet ad, liste første forekomst af et ord og så slette alle andre. Kan du forklare mig nærmere hvad dit Perl script gør, så kan jeg måske selv oversætte til javascript eller php. Hver af udtrykkene (while, split, foreach og print) er jo kendte nok. Hvad gør (<>), hvad betyder pop(@_), hvad betyder keys %tab)?

Det gør stort set du siger den skal. Det var blot for at inspirere dig
til måske at lære noget nyt, og måske få installeret et ordentligt
værktøj på din maskine (vink: www.activestate.com)

jeg er i fuld gang med at lære nyt: både php og MySql og vil godt først prøve om jeg enten kan klare mig med det eller skyde genvej ved en anden løsning

jeg lukker her, men vil godt have et svar også fra erikjacobsen, som jeg, ganske rigtigt, lærte noget nyt af ;-)

jeg fandt ud af noget med en kombination af unix og perl. Det ser sådan ud:

cat tekstfil | perl -Mlocale -pe "s/[^-'\s[:alpha]]//g; s/ /\n/g;" | sort -fu > nyTekstfil

Det virker perfekt og er lynhurtigt, selv med lange tekster