if ( @col2 =~ m/$words[$_](\d+)/ ) {
		$found++;
		@words++;
	}