while(<>) {
	#if (/\-\'/) {next;}
	if (length($_) > 1) {
		print;
	}
}




