DBIx::Class::Schema::Loader is relatively new, and purports to do something similar to
Class::DBI::Loader. I haven't tried it, but it judging by postings on the catalyst newsgroup, it seems to be getting popular. I'm not sure if it does foreign keys. It's not mentioned in the pod, so I guess not... but on the other hand, fk relationships aren't mentioned in the pod for Class::DBI::Loader either.
Whatever the case, DBIX schema loader is under active development, so if there's not fk support already, maybe sometime soon.