1 files changed, 16 insertions, 1 deletions
diff --git a/new.psgi b/new.psgi
index 8f1484d91..7685a7392 100755
--- a/new.psgi
+++ b/new.psgi
@@ -1,4 +1,17 @@
 #!/usr/bin/env perl
+use 5.10.1;
+use strict;
+use warnings;
+
+use File::Basename qw(basename dirname);
+use File::Spec::Functions qw(catdir rel2abs);
+
+BEGIN {
+    require lib;
+    my $dir = rel2abs( dirname(__FILE__) );
+    lib->import( $dir, catdir( $dir, 'lib' ), catdir( $dir, qw(local lib perl5) ) );
+}
+
 use Mojolicious::Lite;
 use Bugzilla::Constants;
 use Bugzilla::CGI::Mojo;
@@ -6,7 +19,6 @@ use Try::Tiny;
 
 plugin 'PODRenderer';
 
-
 app->hook(
     around_dispatch => sub {
         my ($next, $c) = @_;
@@ -33,9 +45,12 @@ __DATA__
 @@ index.html.ep
 % layout 'default';
 % title 'Welcome';
+% use Bugzilla::Util qw(remote_ip);
 
 <p>Hello, <%= $user->name %> &lt;<%= $user->email %>&gt;
 </p>
+<p>Your ip is <%= remote_ip() %>
+</p>
 
 @@ layouts/default.html.ep
 <!DOCTYPE html>