use
Pg::Loader::Query;
*schema_name
= \
&Pg::Loader::Query::schema_name
;
is_deeply [ schema_name(
'person'
)], [
'public'
,
'person'
] ;
is_deeply [ schema_name(
'person'
,
'b'
)], [
'b'
,
'person'
] ;
is_deeply [ schema_name(
'a.person'
)], [
'a'
,
'person'
] ;
is_deeply [ schema_name(
'a.b.c'
)], [
'a'
,
'b.c'
] ;
is_deeply [ schema_name(
'a.b'
,
'def'
)], [
'a'
,
'b'
] ;
#is_deeply [ schema_name('')], [ () ] ;