DBI_TRACE=1 prove -l t/47-find_unused_number.t 
t/47-find_unused_number.t .. 1/2     DBI 1.630-ithread default trace level set to 0x0/1 (pid 6958 pi eda010) at DBI.pm line 288 via DBI.pm line 1516
    -> DBI->connect(dbi:SQLite:api.db, , ****, HASH(0x2e04be0))
    -> DBI->install_driver(SQLite) for linux perl=5.014002 pid=6958 ruid=500 euid=500
       install_driver: DBD::SQLite version 1.46 loaded from /usr/local/lib/perl/5.14.2/DBD/SQLite.pm
    <- install_driver= DBI::dr=HASH(0x3158860)
    <- default_user(undef, undef, ...)= ( undef undef ) [2 items] at DBI.pm line 659
    <- connect('api.db', undef, ...)= ( DBI::db=HASH(0x31590b8) ) [1 items] at DBI.pm line 671
    <- STORE('RaiseError', 1)= ( 1 ) [1 items] at DBI.pm line 723
    <- STORE('PrintError', 0)= ( 1 ) [1 items] at DBI.pm line 723
    <- STORE('AutoCommit', 1)= ( 1 ) [1 items] at DBI.pm line 723
    <- STORE('ShowErrorStatement', 1)= ( 1 ) [1 items] at DBI.pm line 726
    <- STORE('Username', undef)= ( 1 ) [1 items] at DBI.pm line 726
    <- connected('dbi:SQLite:api.db', undef, ...)= ( undef ) [1 items] at DBI.pm line 733
    <- connect= DBI::db=HASH(0x31590b8)
    <- STORE('dbi_connect_closure', CODE(0x31586c8))= ( 1 ) [1 items] at DBI.pm line 742
    <- FETCH('Active')= ( 1 ) [1 items] at DBI.pm line 1522
    <- FETCH('HandleError')= ( undef ) [1 items] at DBI.pm line 1533
    <- FETCH('RaiseError')= ( 1 ) [1 items] at DBI.pm line 1540
    <- STORE('HandleError', __DBIC__DBH__ERROR__HANDLER__=CODE(0x31b80c0))= ( 1 ) [1 items] at DBI.pm line 1508
    <- FETCH('AutoCommit')= ( 1 ) [1 items] at DBI.pm line 1561
    <- prepare_cached('SELECT me.ddi, me.area_code, me.local_number, me.number_quality, me.is_used FROM complete_number_e164 me WHERE ( ( me.ddi = ? AND me.is_used = ? ) )', HASH(0x31c5130), ...)= ( DBI::st=HASH(0x31c8ee8) ) [1 items] at DBI.pm line 1850
    <- bind_param(1, 441224900999, ...)= ( 1 ) [1 items] at DBI.pm line 1891
    <- bind_param(2, 0, ...)= ( 1 ) [1 items] at DBI.pm line 1891
    <- execute= ( '0E0' ) [1 items] at DBI.pm line 1836
    <- fetchrow_array= ( ) [0 items] row-1 at DBI.pm line 2587
    <- finish= ( 1 ) [1 items] at DBI.pm line 2593
Can't call method "ddi" on an undefined value at t/47-find_unused_number.t line 18, <DATA> line 1.
sqlite trace: Finalizing statement: 31d0ef8 at dbdimp.c line 1175
sqlite trace: Removing statement from list: 31d0ef8 at dbdimp.c line 1188
    <- DESTROY(DBI::st=HASH(0x31c5238))= ( undef ) [1 items] at DBI.pm line 261
sqlite trace: Closing DB at dbdimp.c line 510
sqlite trace: rc = 0 at dbdimp.c line 512
    <- DESTROY(DBI::db=HASH(0x3159010))= ( undef ) [1 items] at DBI.pm line 261
    <- disconnect_all= ( '' ) [1 items] at DBI.pm line 750
# Looks like your test exited with 2 just after 1.
!   <- DESTROY(DBI::dr=HASH(0x3158860))= ( undef ) [1 items] during global destruction
t/47-find_unused_number.t .. Dubious, test returned 2 (wstat 512, 0x200)