--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 1a4455ebdf2a33e78a841ba5762ad0b634c491a1..ce0be2501508a72b9ee4925f1539b1cf3ed4e555 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -57,6 +57,11 @@ sub Triple::main {
         version  => $version,
     };
 
+    my @posts = (
+        ("Baba", 1),
+        ("shiet", 2),
+        );
+
     while($request->Accept() >= 0) {
 
         my $cgi = CGI->new;