if ( my $flag = /\@user_info_start/ ... /\@user_info_end/ ) {
		push @userinfo, $_ unless $flag==1 || $flag=~/E0/;
	}