| Server IP : 45.162.171.154 / Your IP : 216.73.216.5 Web Server : Apache System : Linux vxct2015.avnam.net 5.4.106-1-pve #1 SMP PVE 5.4.106-1 (Fri, 19 Mar 2021 11:08:47 +0100) x86_64 User : lpg.com.ar ( 1041) PHP Version : 8.3.33 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /usr/libexec/usermin/htaccess/ |
Upload File : |
#!/usr/bin/perl
# find.cgi
# Find .htaccess files
require './htaccess-lib.pl';
&ReadParse();
# Search for files
open(FIND, "find '$in{'dir'}' -name '$config{'htaccess'}' -print 2>/dev/null |");
while(<FIND>) {
s/\r|\n//g;
push(@found, $_);
}
close(FIND);
# Save and tell the user
@files = &get_htaccess_files();
@files = &unique(@files, @found);
&set_htaccess_files(@files);
&ui_print_header(undef, $text{'find_title'}, "");
if (@found) {
print "<b>",&text('find_list', "<tt>$in{'dir'}</tt>"),"</b><p>\n";
foreach $f (@found) {
print "<tt>$f</tt><br>\n";
}
}
else {
print "<b>",&text('find_none', "<tt>$config{'htaccess'}</tt>",
"<tt>$in{'dir'}</tt>"),"</b><p>\n";
}
&ui_print_footer("", $text{'index_return'});