while(<>){print$_ eq "Is this echo?"?'No. Everyone does.':$_}