Matthew Raymer
2 months ago
commit
43334f4eae
9 changed files with 97 additions and 0 deletions
@ -0,0 +1 @@ |
|||||
|
HAPPY_GREETING=Hello, from hackerbox.io :) |
||||
@ -0,0 +1,12 @@ |
|||||
|
version: '3' |
||||
|
services: |
||||
|
survey-nginx: |
||||
|
container_name: survey-nginx |
||||
|
build: |
||||
|
context: ./survey-nginx |
||||
|
volumes: |
||||
|
- ./survey-nginx/html:/var/www |
||||
|
- ./survey-nginx/perl:/usr/share/perl |
||||
|
- ./survey-nginx/log/web:/var/log/nginx/web |
||||
|
ports: |
||||
|
- "8080:80" |
||||
@ -0,0 +1,9 @@ |
|||||
|
FROM nginx:1.27.0-alpine-perl |
||||
|
|
||||
|
RUN apk update |
||||
|
RUN apk add bash curl |
||||
|
|
||||
|
EXPOSE 80 |
||||
|
|
||||
|
ADD ./nginx.conf /etc/nginx/nginx.conf |
||||
|
RUN rm /etc/nginx/conf.d/default.conf |
||||
@ -0,0 +1,3 @@ |
|||||
|
#!/usr/bin/perl -wT |
||||
|
print "Content-type: text/plain\n\n"; |
||||
|
print "Hello World In CGI Perl" |
||||
@ -0,0 +1,13 @@ |
|||||
|
<!DOCTYPE html> |
||||
|
<html lang="en"> |
||||
|
<head> |
||||
|
<meta charset="UTF-8"> |
||||
|
<meta name="viewport" content="width=device-width, initial-scale=1.0"> |
||||
|
<meta http-equiv="X-UA-Compatible" content="ie=edge"> |
||||
|
<title>Document</title> |
||||
|
</head> |
||||
|
<body> |
||||
|
<h1>Hello World In html file</h1> |
||||
|
|
||||
|
</body> |
||||
|
</html> |
||||
@ -0,0 +1,6 @@ |
|||||
|
127.0.0.1 - - [07/Jul/2024:09:25:01 +0000] "GET /hello_world.pl HTTP/1.1" 502 28 "-" "curl/8.5.0" |
||||
|
127.0.0.1 - - [07/Jul/2024:09:33:52 +0000] "GET /hello_world.pl HTTP/1.1" 502 28 "-" "curl/8.5.0" |
||||
|
127.0.0.1 - - [07/Jul/2024:09:41:42 +0000] "GET /hello_world.pl HTTP/1.1" 502 28 "-" "curl/8.5.0" |
||||
|
127.0.0.1 - - [07/Jul/2024:09:47:09 +0000] "GET /hello_world.pl HTTP/1.1" 502 28 "-" "curl/8.5.0" |
||||
|
127.0.0.1 - - [07/Jul/2024:09:51:26 +0000] "GET /hello_world.pl HTTP/1.1" 502 28 "-" "curl/8.5.0" |
||||
|
127.0.0.1 - - [07/Jul/2024:09:52:58 +0000] "GET /hello_world.pl HTTP/1.1" 502 28 "-" "curl/8.5.0" |
||||
@ -0,0 +1,4 @@ |
|||||
|
2024/07/07 09:41:42 [info] 9#9: *1 client 127.0.0.1 closed keepalive connection |
||||
|
2024/07/07 09:47:09 [info] 26#26: *1 client 127.0.0.1 closed keepalive connection |
||||
|
2024/07/07 09:51:26 [info] 28#28: *3 client 127.0.0.1 closed keepalive connection |
||||
|
2024/07/07 09:52:58 [info] 45#45: *5 client 127.0.0.1 closed keepalive connection |
||||
@ -0,0 +1,34 @@ |
|||||
|
user nginx; |
||||
|
worker_processes 1; |
||||
|
error_log /var/log/nginx/error.log debug; |
||||
|
pid /var/run/nginx.pid; |
||||
|
load_module modules/ngx_http_perl_module.so; |
||||
|
|
||||
|
events { |
||||
|
worker_connections 1024; |
||||
|
} |
||||
|
|
||||
|
http { |
||||
|
perl_modules /usr/lib/perl5/vendor_perl; |
||||
|
include /etc/nginx/mime.types; |
||||
|
sendfile off; |
||||
|
server_tokens off; |
||||
|
|
||||
|
server { |
||||
|
listen 80; |
||||
|
server_name _; |
||||
|
resolver 8.8.8.8; |
||||
|
|
||||
|
location / { |
||||
|
perl 'sub { |
||||
|
my $r = shift; |
||||
|
$r->send_http_header("text/html"); |
||||
|
$r->print("Hello from Perl embedded in nginx!\n"); |
||||
|
return OK; |
||||
|
}'; |
||||
|
} |
||||
|
location ~ \.pl$ { |
||||
|
# perl 'MyApp::handler'; # Assuming MyApp::handler is defined in a Perl module |
||||
|
} |
||||
|
} |
||||
|
} |
||||
@ -0,0 +1,15 @@ |
|||||
|
package MyModule; |
||||
|
|
||||
|
use nginx; # Make sure to use the nginx module |
||||
|
|
||||
|
sub handler { |
||||
|
my $r = shift; # Get the request object |
||||
|
$r->send_http_header("text/html"); # Send HTTP headers |
||||
|
|
||||
|
# Print a simple HTML page |
||||
|
$r->print("<html><body><h1>Hello, Nginx Perl!</h1></body></html>"); |
||||
|
|
||||
|
return OK; |
||||
|
} |
||||
|
|
||||
|
1; # Ensure the module returns true |
||||
Loading…
Reference in new issue