2013-03-07から1日間の記事一覧
package let; use 5.10.1; sub s { say @_ } package main; let's dance; #=> dance let's unko; #=> unko やっぱPerlはさいこうだぜ!・追記 Acme::Don'tというのがあることを教えてもらいました。 実装を見てみると sub don't (&) {} となっていて、確かに…
FIELDS TERMINATED BYうんたら毎回ググってる。 use 5.10.1; use strict; use warnings; use DBI; use Encode; use Text::CSV; my $sql = shift @ARGV; my $dbh = DBI->connect(...); my $sth = $dbh->prepare($sql); my $csv = Text::CSV->new; $sth->execu…