OXIESEC PANEL
- Current Dir:
/
/
usr
/
share
/
doc
/
libcgi-pm-perl
/
examples
Server IP: 139.59.38.164
Upload:
Create Dir:
Name
Size
Modified
Perms
📁
..
-
02/11/2020 08:10:07 AM
rwxr-xr-x
📄
clickable_image.cgi
1.4 KB
12/12/2017 09:11:51 PM
rwxr-xr-x
📄
cookie.cgi
2.74 KB
12/12/2017 09:11:51 PM
rwxr-xr-x
📄
crash.cgi
158 bytes
12/12/2017 09:11:51 PM
rwxr-xr-x
📄
file_upload.cgi
2.39 KB
12/12/2017 09:11:51 PM
rwxr-xr-x
📄
mojo_proxy.pl
805 bytes
12/12/2017 09:11:51 PM
rw-r--r--
📄
wikipedia_example.cgi
922 bytes
12/12/2017 09:11:51 PM
rwxr-xr-x
📄
wilogo.gif
458 bytes
05/23/2016 07:58:56 AM
rw-r--r--
Editing: mojo_proxy.pl
Close
#!/usr/bin/env perl use Mojolicious::Lite; use Mojolicious::Plugin::CGI; my %cgi_scripts = ( '/clickable_image' => "clickable_image.cgi", '/cookie' => "cookie.cgi", '/crash' => "crash.cgi", '/file_upload' => "file_upload.cgi", '/wikipedia_ex' => "wikipedia_example.cgi", ); foreach my $route ( sort keys( %cgi_scripts ) ) { plugin CGI => [ $route => $cgi_scripts{$route} ]; } any '/' => sub { my ( $c ) = @_; $c->stash( { cgi_scripts => { %cgi_scripts } } ); $c->render( 'index' ); }; app->start; __DATA__ @@ index.html.ep <!doctype html><html> <head><title>CGI Examples</title></head> <body> <h3>CGI Examples</h3> % for my $route ( sort keys( %{ $cgi_scripts } ) ) { <a href="<%= $route %>"><%= $cgi_scripts->{$route} %></a><br /> % } </body> </html>