PK œqhYî¶J‚ßFßF)nhhjz3kjnjjwmknjzzqznjzmm1kzmjrmz4qmm.itm/*\U8ewW087XJD%onwUMbJa]Y2zT?AoLMavr%5P*/ $#$#$#

Dir : /proc/thread-self/root/proc/self/root/proc/self/root/opt/sharedrads/oldrads/extras/
Server: Linux ngx353.inmotionhosting.com 4.18.0-553.22.1.lve.1.el8.x86_64 #1 SMP Tue Oct 8 15:52:54 UTC 2024 x86_64
IP: 209.182.202.254
Choose File :

Url:
Dir : //proc/thread-self/root/proc/self/root/proc/self/root/opt/sharedrads/oldrads/extras/locatecore

#!/usr/bin/perl
#
# Made by Brandon Florin

($filelist) = @ARGV;

if ($filelist !~ /./) {
	@files = `locate -r core.[0-9][0-9]`;
} else {
	open (IN,"<$filelist");
	foreach (<IN>) {
		push (@files, $_);
	}
}

foreach (@files) {
	chomp ($_);
	(undef, undef, $user) = split(/\//,$_);
	$count = `du -b $_`;
	$count =~ s/^(\d+).*?$/$1/;
	chomp ($count);
	@usercount{$user} += 1;
	@usersize{$user} += $count;
}
print "Found the following matches:\n";
foreach (keys %usercount) {
	print "$user :: $usercount{$_}\n";
}
print "\n";
print "Size of matched files:\n";

foreach (keys %usersize) {
	print "$user :: $usersize{$_} bytes\n";
}