perl -n -i.bak -e "tr/;/\n/;" .\funkisym.pm
perl -n -i.bak -e "y/\Q;\E/\n/;" .\funkisym.pm
perl -n -i.bak -e "s/(;)/$1\n/g;" .\funkisym.pm