Perl に Embedded SQL を実現するモジュールってないの？

マジでないのかな。

while (SELECT id,name INTO my $id,$name FROM users) {
    print "$id:$name\n";
}

とか書けて良さそうなものなのに。

追記: いや、C 系の記法とは離れるけど、こっちの記法のがいいか。フィルタの実装も簡単そうだし。

while (my ($id,$name) = SELECT id,name FROM users) {
    print "$id:$name\n";
}

INSERT INTO users (id,name) VALUES ($id,$name);