Sub::AutoでDBICにfindByほげほげを生やしてみた - Lism.in * blog - nekoya (id:studio-m)

Sub::AutoでAUTOLOADを隠蔽 - dann@webdev - dann's portal が面白そうだったのでDBIC::ResultSetにfindBy〜を生やしてみた。 perldoc見ても$selfがどこに入ってくるのか分からんかったけど、@_に関数名のマッチが入って、その次に来るみたい。 #!/usr/bin/perl use strict; use warnings; package DBIx::Class::ResultSet; use Sub::Auto; autosub /^findBy(\w+)$/ { my ( $method, $self, $value ) = @_; $method = lc $method; return undef unless grep /^$method$/, $self->result_source->columns; $s

[kamawada]

oooo

[fbis]

面白い。

[dann]

お、いいっすね