elsif (/bb\s$input/) {
	 print $_;
	 last;
	 }