if ($line =~ m/^>(.*)$/){
	$header = $1;