Subscribe
class Square extends Rectangle
{
function Square( $width )
{
return Rectangle($width,$width);
}
}
use HTML::Template;
my $template=HTML::Template->new(filename=>'foo.tmpl');
$template->param(list => \$list);
print $template->output();
use DBI;
my $KEY = 'foobarbaz';
my $dbh =
DBI->connect( "dbi:Google:", $KEY, undef, { debug => 0 } )
|| die "$dbh->errstr";
my $sth = $dbh->prepare(
qq[
SELECT url,title,summary FROM google WHERE q = "askmefi"
LIMIT 0,100
]
);
$sth->execute() || die "$dbh->errstr";
while ( my $r = $sth->fetchrow_hashref ) {
print "$r->{'title'}\n$r->{'url'}\n$r->{'summary'}\n\n";
}
You are not logged in, either login or create an account to post comments
That's generally how I work, though. Flailing about and hoping it goes click. Sometimes it does!
posted by xmutex at 9:32 AM on November 8, 2005