Class::DBI

こんな感じで使えてGoodです。

my @users = Hoge::Model::ClassDBI::User->search
    (disable => 0, {order_by => 'id'});
foreach my $user (@users) {
  # ごにょごにょ
  printf("%s,%s,%s\n", $user->id(), $user->name(), $user->pass());
}

一瞬

$user->{'id'}, $user->{'name'}, $user->{'pass'}

と、やりそうになりますがこれは使えませんので注意。

自分はベターCのつもりでPerlを使っているので、後置 if とか後置 foreach とか map とかあるとソースが読めません・・・。日本語に「〜してね。もし〜なら」という文法はないので、後置文法は日本人向けじゃないと思います(他の言語で使えない表現だし)。