Skip to content

Commit

Permalink
Updated cgi
Browse files Browse the repository at this point in the history
  • Loading branch information
vti committed Apr 13, 2011
1 parent 0dbfd75 commit 44e70a7
Showing 1 changed file with 15 additions and 2 deletions.
17 changes: 15 additions & 2 deletions bin/look2remove.me.cgi
Original file line number Diff line number Diff line change
@@ -1,6 +1,19 @@
#!/usr/bin/perl
#!/usr/bin/env perl

use strict;
use warnings;

use Plack::Loader;

my $app = Plack::Util::load_psgi("look2remove.me.psgi");
my $root;

BEGIN {
use Cwd ();
use File::Spec ();
use File::Basename ();

$root = File::Spec->rel2abs(File::Basename::dirname(Cwd::realpath(__FILE__)));
}

my $app = Plack::Util::load_psgi("$root/look2remove.me.psgi");
Plack::Loader->auto->run($app);

0 comments on commit 44e70a7

Please sign in to comment.