anatomy=anatomia ancestor=poprzednik ancestor=przodek ancestral=dziedziczny ancestral=rodowy ancestry=pochodzenie ancestry=przodkowie anchor=kotwica #### anatomy=anatomia ancestor=poprzednik, przodek ancestral=dziedziczny, rodowy ancestry=pochodzenie, przodkowie anchor=kotwica #### #!/usr/bin/perl while (<>) { s{ (^[^=]+) #should match the duplicated word [=] (.+) #should be the translation after the "=" \n \1 [=] (.+) \n }{$1=$2, $3}xig; print; } #### ancient=starozytny ancillary=pomocniczy ancillary=sluzebny ancillary=wspomagajacy and=a, coraz, i and=oraz anecdote=anegdota anemone=zawilec #### ancient=starozytny ancillary=pomocniczy, sluzebny, wspomagajacy and=a, coraz, i, oraz anecdote=anegdota anemone=zawilec