#!perl -p s; |IV;;g;s;I{5}|I\KIII;V;;s;^$;VIII