1..27
ok 1 - adrianh_original: 
ok 2 - adrianh_original: bar
ok 3 - adrianh_original: Foo::Bar=99,bar
Use of uninitialized value in concatenation (.) or string at (eval 7) line 6.
ok 4 - adrianh_original: undef
ok 5 - adrianh_original: all=99,bar
ok 6 - adrianh_original: bar,Foo::Bar=99
ok 7 - adrianh_original: bar,all=99
ok 8 - adrianh_original: all
ok 9 - adrianh_original: Foo::Bar
not ok 10 - aristotle: 
#     Failed test ((eval 19) at line 11)
#          got: '1'
#     expected: ''
not ok 11 - aristotle: bar
#     Failed test ((eval 21) at line 11)
#          got: '1'
#     expected: ''
not ok 12 - aristotle: Foo::Bar=99,bar
#     Failed test ((eval 23) at line 11)
#          got: '1'
#     expected: '99'
Use of uninitialized value in split at (eval 25) line 7.
not ok 13 - aristotle: undef
#     Failed test ((eval 25) at line 11)
#          got: '1'
#     expected: ''
ok 14 - aristotle: all=99,bar
not ok 15 - aristotle: bar,Foo::Bar=99
#     Failed test ((eval 29) at line 11)
#          got: '1'
#     expected: '99'
ok 16 - aristotle: bar,all=99
ok 17 - aristotle: all
ok 18 - aristotle: Foo::Bar
ok 19 - adrianh_no_warnings: 
ok 20 - adrianh_no_warnings: bar
ok 21 - adrianh_no_warnings: Foo::Bar=99,bar
ok 22 - adrianh_no_warnings: undef
ok 23 - adrianh_no_warnings: all=99,bar
ok 24 - adrianh_no_warnings: bar,Foo::Bar=99
ok 25 - adrianh_no_warnings: bar,all=99
ok 26 - adrianh_no_warnings: all
ok 27 - adrianh_no_warnings: Foo::Bar
# Looks like you failed 5 tests of 27.