#!perl -p
$\.=$"x y/
//c