if ($line =~ /v/) {
			# B  M  5yrs  Straphanger-Amy Hest                       Driver:...........u
			chomp $line;
			my ($trainer, $last_driver) = split //, $line;
			# Remove whitespaces from start
			$trainer =~ s/^\s+//;
			
			# Remove the first chars of variable
			$last_driver = substr($last_driver, 1);
			# Remove whitespaces from start
			$last_driver =~ s/^\s+//;

			print OUTPUT "<ParaStyle:><pHyphenationLadderLimit:0><pHyphenationZone:22.700000><pTabRuler:28.350000\,Left\,.\,0\,\;251.050000\,Right\,.\,0\,\;><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pRuleAboveColor:Black><pRuleAboveTint:100.000000><pRuleBelowColor:Black><pRuleBelowTint:100.000000><cSize:5.500000><cBaselineShift:12.000000><cLeading:5.500000><cFont:Switzerland>	$trainer	$last_driver
<cSize:><cBaselineShift:><cLeading:><cFont:><pHyphenationLadderLimit:><pHyphenationZone:><pTabRuler:><pMaxWordSpace:><pMinWordSpace:><pMaxLetterspace:><pMinLetterspace:><pKeepFirstNLines:><pKeepLastNLines:><pRuleAboveColor:><pRuleAboveTint:><pRuleBelowColor:><pRuleBelowTint:>";
		}