ean::JSON; use Perinci::Sub::Normalize qw(normalize_function_metadata); has dsn => (is => 'rw'); has username => (is => 'rw'); has password => (is => 'rw'); my $cleanser = Data::Clean::JSON->ge