<>;($a,$b,$c)=glob<>;$a+=$b+=$c;$/=$";($%-=++$d[$%]-length)>=$a?$\+=$d[$%-$a]&$d[$%-$b]&$d[$%-$c]:0for<>;print