$dbh->My::App::poo( 12345 );

package My::App;
use DBIx::ProcedureCall qw( poo );