Bevezetés
Elszegődtél egy helyi könyvtárba, hogy segíts rendezni a régi könyvek gyűjteményét.
A diák olvasók gyakran homályosan felidézett idézeteket keresnek, hogy hivatkozhassanak rájuk a szemináriumi dolgozataikban.
Ahelyett, hogy minden könyvet kézzel olvasnál el elölről a végéig, úgy döntesz, építesz egy kis eszközt, amely átfésüli a könyveket, és megkeresi ezeket a töredékes idézeteket.
Utasítások
Keresd meg a fájlokban azokat a sorokat, amelyek illeszkednek egy keresési stringre, és add vissza az összes egyező sort.
A Unix grep parancs a fájlokban olyan sorokat keres, amelyek illeszkednek egy reguláris kifejezésre.
A feladatod egy egyszerűsített grep parancs megvalósítása, amely rögzített stringek keresését támogatja.
A grep parancs három argumentumot kap:
- A keresendő string.
- Nulla vagy több kapcsoló, amelyekkel testreszabhatod a parancs viselkedését.
- Egy vagy több fájl, amelyekben keresni kell.
Ezután beolvassa a megadott fájlok tartalmát (a megadott sorrendben), megkeresi azokat a sorokat, amelyek tartalmazzák a keresési stringet, és végül visszaadja ezeket a sorokat abban a sorrendben, ahogy megtalálta őket.
Ha több fájlban keresel, minden egyező sor elé a fájl neve és egy kettőspont (':') kerül.
Kapcsolók
A grep parancs a következő kapcsolókat támogatja:
-
-n A kimenet minden sora elé írd oda a sorszámot és egy kettőspontot (':'); a számot a fájlnév után helyezd el (ha van).
-
-l Csak azon fájlok nevét írd ki, amelyek legalább egy egyező sort tartalmaznak.
-
-i Kis-nagybetűre érzéketlen összehasonlítással keress.
-
-v Fordítsd meg a program működését, és gyűjtsd össze az összes olyan sort, amely nem egyezik.
-
-x Csak azokra a sorokra keress, ahol a keresési string a teljes sorral egyezik.
Szavak
Valósítsd meg:
grep ( pattern flags files -- lines )
A pattern a keresett string, a flags egy tömb, amely nulla vagy több flag stringet tartalmaz: "-n", "-l", "-i", "-v" és "-x", a files pedig egy vagy több fájlnevet tartalmazó tömb. Add vissza az egyező sorokat (a kért fájlnév- és sorszám-előtagokkal együtt) stringek tömbjeként.
Ha a -l flag meg van adva, add vissza azon fájlok neveinek tömbjét, amelyek legalább egy egyezést tartalmaznak.
Fájlok beolvasása
Olvasd be egy fájl sorait a file-lines függvénnyel, és adj meg egy kódolást:
USING: io.encodings.utf8 io.files ;
"iliad.txt" utf8 file-lines
! => { "Achilles sing, O Goddess! Peleus' son;" ... }
A három mellékelt fájl (iliad.txt, midsummer-night.txt és paradise-lost.txt) a feladattal együtt a munkakönyvtárban van, így elég a nevük alapján beolvasni őket.
