eval'$_=<>'.';y/[]ZA-z/[]A-za/'x<>;y/?!/!?/;print