fixed require statement

git-svn-id: http://yolanda.mister-muffin.de/svn@8 7eef14d0-6ed0-489d-bf55-20463b2d70db
This commit is contained in:
josch 2007-10-10 09:44:51 +00:00
parent c700555ef8
commit ab07f7baad

View file

@ -1,3 +1,5 @@
require "/var/www/perl/include.pl";
sub fill_tagcloud {
my $sth = $dbh->prepare(qq{select text, count from tagcloud });
$sth->execute();
@ -8,5 +10,3 @@ sub fill_tagcloud {
$sth->finish();
$dbh->disconnect();
}
1;