fixed spelling error
git-svn-id: http://yolanda.mister-muffin.de/svn@26 7eef14d0-6ed0-489d-bf55-20463b2d70db
This commit is contained in:
parent
0a6c9c9b0b
commit
f7f24dd5bf
8 changed files with 8 additions and 1 deletions
|
@ -1,3 +1,4 @@
|
|||
#!/usr/bin/perl
|
||||
require "/var/www/perl/include.pl";
|
||||
|
||||
#get tags from database and fill $page with xml
|
||||
|
|
|
@ -1,3 +1,4 @@
|
|||
#!/usr/bin/perl
|
||||
use CGI qw(:standard);
|
||||
use CGI::Session;
|
||||
use DBI;
|
||||
|
|
|
@ -1,3 +1,4 @@
|
|||
#!/usr/bin/perl
|
||||
require "/var/www/perl/include.pl";
|
||||
require "/var/www/perl/functions.pl";
|
||||
|
||||
|
|
|
@ -1,3 +1,4 @@
|
|||
#!/usr/bin/perl
|
||||
require "/var/www/perl/include.pl";
|
||||
|
||||
#initialize session data
|
||||
|
|
|
@ -1,3 +1,4 @@
|
|||
#!/usr/bin/perl
|
||||
require "/var/www/perl/include.pl";
|
||||
|
||||
#initialize session data
|
||||
|
|
|
@ -29,7 +29,7 @@ if($query->param('query')) {
|
|||
#get every returned value
|
||||
while (my ($title, $caption) = $sth->fetchrow_array())
|
||||
{
|
||||
#really ofuscated array/hash creation
|
||||
#really obfuscated array/hash creation
|
||||
push @{ $page->{'results'}->{'result'} }, { 'thumbnail' => ['./video-stills/225x150/4chan_city_mashup.png'],
|
||||
'rdf:RDF' => { 'cc:Work' => { 'rdf:about' => './videos/1050x700/4chan_city_mashup.ogg',
|
||||
'dc:title' => [$title]
|
||||
|
|
|
@ -1,3 +1,4 @@
|
|||
#!/usr/bin/perl
|
||||
require "/var/www/perl/include.pl";
|
||||
require "/var/www/perl/functions.pl";
|
||||
|
||||
|
|
|
@ -1,3 +1,4 @@
|
|||
#!/usr/bin/perl
|
||||
require "/var/www/perl/include.pl";
|
||||
require "/var/www/perl/functions.pl";
|
||||
|
||||
|
|
Loading…
Reference in a new issue