DBI_TRACE=1 prove -l t/48-dbi_find_unused_number.t 
t/48-dbi_find_unused_number.t ..     DBI 1.630-ithread default trace level set to 0x0/1 (pid 7128 pi 1d56010) at DBI.pm line 288 via 48-dbi_find_unused_number.t line 6
    -> DBI->connect(dbi:SQLite:api.db, , ****)
    -> DBI->install_driver(SQLite) for linux perl=5.014002 pid=7128 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(0x248ac28)
    <- default_user(undef, undef, ...)= ( undef undef ) [2 items] at DBI.pm line 659
    <- connect('api.db', undef, ...)= ( DBI::db=HASH(0x248b480) ) [1 items] at DBI.pm line 671
    <- STORE('PrintError', 1)= ( 1 ) [1 items] at DBI.pm line 723
    <- STORE('AutoCommit', 1)= ( 1 ) [1 items] at DBI.pm line 723
    <- STORE('Username', undef)= ( 1 ) [1 items] at DBI.pm line 726
    <- connected('dbi:SQLite:api.db')= ( undef ) [1 items] at DBI.pm line 733
    <- connect= DBI::db=HASH(0x248b480)
    <- STORE('dbi_connect_closure', CODE(0x248aa90))= ( 1 ) [1 items] at DBI.pm line 742
    <- prepare('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 = ? ) )')= ( DBI::st=HASH(0x248b7e0) ) [1 items] at 48-dbi_find_unused_number.t line 12
    <- bind_param(1, 441224900999)= ( 1 ) [1 items] at 48-dbi_find_unused_number.t line 16
    <- bind_param(2, 0)= ( 1 ) [1 items] at 48-dbi_find_unused_number.t line 17
    <- execute= ( '0E0' ) [1 items] at 48-dbi_find_unused_number.t line 18
    <- fetchrow_array= ( '441224900999' 1224 900999 'gold' 0 ) [5 items] row1 at 48-dbi_find_unused_number.t line 21
    <- fetchrow_array= ( ) [0 items] row1 at 48-dbi_find_unused_number.t line 21
t/48-dbi_find_unused_number.t .. 1/1 sqlite trace: Closing DB at dbdimp.c line 510
sqlite trace: rc = 5 at dbdimp.c line 512
sqlite trace: Finalizing statement (24f07a8) at dbdimp.c line 516
sqlite trace: Trying to close DB again at dbdimp.c line 522
    <- disconnect= ( 1 ) [1 items] at 48-dbi_find_unused_number.t line 27
    <- DESTROY(DBI::st=HASH(0x248b5a0))= ( undef ) [1 items]
    <- DESTROY(DBI::db=HASH(0x248b3d8))= ( undef ) [1 items]
    <- disconnect_all= ( '' ) [1 items] at DBI.pm line 750
!   <- DESTROY(DBI::dr=HASH(0x248ac28))= ( undef ) [1 items] during global destruction
t/48-dbi_find_unused_number.t .. ok   
All tests successful.
Files=1, Tests=1,  1 wallclock secs ( 0.03 usr  0.00 sys +  0.07 cusr  0.02 csys =  0.12 CPU)
Result: PASS