whoami7 - Manager
:
/
proc
/
self
/
root
/
usr
/
local
/
rvm
/
src
/
openssl-1.0.1i
/
util
/
Upload File:
files >> //proc/self/root/usr/local/rvm/src/openssl-1.0.1i/util/dirname.pl
#!/usr/local/bin/perl if ($#ARGV < 0) { die "dirname.pl: too few arguments\n"; } elsif ($#ARGV > 0) { die "dirname.pl: too many arguments\n"; } my $d = $ARGV[0]; if ($d =~ m|.*/.*|) { $d =~ s|/[^/]*$||; } else { $d = "."; } print $d,"\n"; exit(0);
Copyright ©2021 || Defacer Indonesia