diff options
-rwxr-xr-x | minimun | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -5,6 +5,8 @@ use warnings; use IPC::Run qw(run); use Time::HiRes qw( time ); +chdir('/home/minimun/minimun'); + my ($buffer, @pairs, $pair, $name, $val, %FORM); if ($ENV{'REQUEST_METHOD'} eq "GET") { @@ -36,7 +38,6 @@ else{ die; } - $in .= "\\bye\n"; my $timestamp = time; |