SQL::Abstract ã使ãåã - JPerl Advent Calendar 2009 Perl ã«é¢ããã¡ãã£ã¨ãã Tips ãã®ã£ãã¦ã¿ãããã¡ããã¨ç¶ãããªï¼ ä»æ´ãæºå¸¯å°èª¬ã«ããã£ã¦ã id:ZIGOROu ã§ããã¢ãã²ã¼ã®ãªã³ã©ã¤ã³3ã£ã¦å°èª¬ãé¢ç½ãã§ããï¼ ä»æ¥ã¯ SQL::Abstract ã使ãåãã¨è¨ããã¿ã§è¡ãã¾ãã ã¾ãè¶ åºæ¬ç·¨ ç°¡å㪠SQL æã®çæããå§ãã¾ãããã use strict; use warnings; use Data::Dump qw(dump); use SQL::Abstract; my $s = SQL::Abstract->new; my ($stmt, @bind) = $s->select( "activity", # tables [qw/id title sender created_on/], # columns
{{#tags}}- {{label}}
{{/tags}}