6 push @out,$v1; # save original
7 $v1 =~ s/(HRV|CRO)/Hrvatski/gi;
8 $v1 =~ s/GER/Njemaèki/gi;
9 $v1 =~ s/ENG/Engleski/gi;
10 $v1 =~ s/ITA/Talijanski/gi;
11 $v1 =~ s/SLV/Slovenski/gi;
12 $v1 =~ s/RUS/Ruski/gi;
13 $v1 =~ s/FRE/Francuski/gi;
14 push @out,$v1; # save modified version