Parent Directory | Revision Log | Patch
revision 3113 by alien, Tue Feb 28 02:37:24 2012 UTC | revision 3644 by alien, Wed Mar 21 11:55:45 2012 UTC | |
---|---|---|
# | Line 52 my $file = $ENV{PATH_INFO}; | Line 52 my $file = $ENV{PATH_INFO}; |
52 | return_error(500, 'Server error') if !$file; | return_error(500, 'Server error') if !$file; |
53 | ||
54 | # split up request | # split up request |
55 | return_error(500, 'Server error') if $file !~ m!^(.+)/([^/]*)$!; | return_error(500, 'Server error') if $file !~ m!^(.*)/([^/]*)$!; |
56 | my $dest_path = $1; | my $dest_path = $1; |
57 | my $filename = $2; | my $filename = $2; |
58 | my $file_type = ""; | my $file_type = ""; |
|
ViewVC Help | |
Powered by ViewVC 1.1.30 |