my $schema = DBIx::Class::Schema::Loader::make_schema_at(UR_STUFS); for my $moniker ( $schema->sources ) { my $source = $schema->source($moniker); printf "%30s -> %s\n", $source->name, $moniker; }