ba := FileLocator changes asFileReference contents asByteArray.
String streamContents: [ :stream |
	stream nextPutAll: 'ByteArray size: ', ba size printString; cr.
	stream nextPutAll: 'Speed:'; cr.
	stream nextPutAll: 'Base64MimeConverter: '; nextPutAll: [ (Base64MimeConverter mimeEncode: ba readStream multiLine: false)  ] bench printString; cr.
	stream nextPutAll: '#hex: '; nextPutAll: [ ba hex ] bench printString; cr.
	stream nextPutAll: '#asString: '; nextPutAll: [ ba asString ] bench printString; cr.
	stream nextPutAll: 'ZnBase64Encoder '; nextPutAll: [ (Base64MimeConverter mimeEncode: ba readStream multiLine: false) ] bench printString; cr.

	stream nextPutAll: 'Size:'; cr.
	stream nextPutAll: 'Base64MimeConverter: '; nextPutAll: ba base64Encoded size printString; cr.
	stream nextPutAll: '#hex: '; nextPutAll: ba hex size printString; cr.
	stream nextPutAll: '#asString: '; nextPutAll: ba asString size printString; cr.
	stream nextPutAll: 'ZnBase64Encoder '; nextPutAll: (ZnBase64Encoder new encode: ba) size printString; cr.
]