summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorCranix <you@example.com>2013-03-19 18:06:06 -0400
committerCranix <you@example.com>2013-03-19 18:06:06 -0400
commit63e588f3882eb421a015de10c401773ff9021c53 (patch)
tree10d0a1ca72ed6b2ab7e21d4380c3462deb47dc1e
parent05e4f5b64a94ecc105e99db3ef37862da16aafb2 (diff)
downloadBiblioteka-63e588f3882eb421a015de10c401773ff9021c53.tar.gz
Biblioteka-63e588f3882eb421a015de10c401773ff9021c53.tar.bz2
Biblioteka-63e588f3882eb421a015de10c401773ff9021c53.zip
Usunołem kilka zbędnych tablic.
-rwxr-xr-xbin/app.pl15
1 files changed, 4 insertions, 11 deletions
diff --git a/bin/app.pl b/bin/app.pl
index 5b8d7be..fbe6fdc 100755
--- a/bin/app.pl
+++ b/bin/app.pl
@@ -16,16 +16,6 @@ get '/' => sub
my $sth = $dbh->prepare("select * from ksiazki");
$sth->execute();
- my @id;
- my @isbn;
- my @title;
- my @author;
- my @owner;
- my @state;
- my @type;
-
- #my $result=''; #Poniewaz trzeba zwrocic string, wartosci kolejno pobierane z bazy,
- #beda dodawane do zmiennej ze stringiem, na razie pustym
my $i=0;
my @result;
my $ii=0;
@@ -60,8 +50,11 @@ get '/req/:book' => sub
}
else #Stalo sie cos dziwnego...
{
- return "OMGLOLWTF";
+ return "-1";
}
};
+$sth->finish();
+$dbh->disconnect();
+
dance;