perl -ne}{$./'' file