$ perl pm_11152486_test_more.t 1..3 not ok 1 - Fail: ok() # Failed test 'Fail: ok()' # at pm_11152486_test_more.t line 11. not ok 2 - Fail: is() # Failed test 'Fail: is()' # at pm_11152486_test_more.t line 14. # got: '1' # expected: '2' not ok 3 - Fail: ok() # Failed test 'Fail: ok()' # at pm_11152486_test_more.t line 17. # $var1[1] $var2[2] # Looks like you failed 3 tests of 3.