Raku kurss / Pamati / Asociatīvie datu tipi / Vingrinājumi / Aizstāt ar antonīmiem

Risinājums: Aizstāt ar antonīmiem

Lai atrisinātu uzdevumu, faila dictionary.raku saturs tiek nokopēts risinājuma failā replace-with-antonyms.raku. Pēc tam cikls pār input argumentiem mēģina atrast vārdu vārdnīcā, un, ja tas izdodas, tiek ņemts antonīms. Ja vārdnīcā šāda vārda nav, tiek izmantots oriģinālais vārds.

Kods

Risinājums ir parādīts zemāk. Vārdnīca šeit ir parādīta tikai daļēji.

my %dictionary =
    'above' => 'below',
    'absent' => 'present',
    'achieve' => 'fail',
    # . . .
    'wrong' => 'right',
    'young' => 'old'    
;

for @*ARGS -> $word {
    say %dictionary{$word} // $word;
}

🦋 Atrodiet programmu failā replace-with-antonyms.raku.

Izvade

$ raku exercises/associatives/replace-with-antonyms.raku early morning
late
evening

$ raku exercises/associatives/replace-with-antonyms.raku big soft drive
small
hard
drive

Komentāri

1. // operators ir definētais-vai operators, kas atgriež pirmo definēto operandu.
2. Vārdnīcā visi atslēgas vārdi ir vārdi (t.i., tie izskatās kā identifikatori), tāpēc jums nav nepieciešams tos citēt vārdnīcā. Tādējādi ir iespējams izveidot vārdnīcu, kā parādīts zemāk:

my %dictionary =
    above => 'below',
    absent => 'present',
    achieve => 'fail',
    # . . .
    wrong => 'right',
    young => 'old'    
;

Kursa navigācija

← Pozicionālie datu tipi / Diapazonu apakšizteiksmes   |   Funkciju izveide un izsaukšana →