Length = 5
Uncaught exception from user code:
	Inconsistent width for field 2.
	Specified as '{>(5)>}' but actual width is 7
	in call to &form at test_perl6Form.pl line 33.
	Perl6::Form::fatal("Inconsistent width for field 2.\x{a}", "Specified as '{>(5)>}' but actual width is 7") called at /usr/local/share/perl/5.20.1/Perl6/Form.pm line 663
	Perl6::Form::segment("{<<{15}<<}|{>(5)>}|{><}|{<<{15}<<}|{>(5)>}%|\x{a}", ARRAY(0x1e676b8), HASH(0x1e5d400), 0, HASH(0x1e5d448)) called at /usr/local/share/perl/5.20.1/Perl6/Form.pm line 1097
	Perl6::Form::form(undef, undef, "TEST", "003  ", " ", "Test", 100.0) called at test_perl6Form.pl line 33