perl -pe "}{$_=$." filename