1 package DBIx::Class::CDBICompat::Retrieve;
4 use warnings FATAL => 'all';
6 sub retrieve { shift->find(@_) }
7 sub retrieve_all { shift->search }
9 sub retrieve_from_sql {
10 my ($class, $cond, @rest) = @_;
11 $cond =~ s/^\s*WHERE//i;
12 $class->search_literal($cond, @rest);
15 sub count_all { shift->count }
16 # Contributed by Numa. No test for this though.