my $count = 0;
	foreach my $len (@lens)
	{
		if ( $count ++ ) 
		{
			$format .= "x1";
		}
		$format .= "A$len";
	}