ShellBanner
IP Address: 80.252.133.24:443 You: 216.73.216.51
System:Linux MiraNet 3.0.0-14-generic-pae #23-Ubuntu SMP Mon Nov 21 22:07:10 UTC 2011 i686
Software:Apache. PHP/5.3.6-13ubuntu3.10
ID:uid=65534(nobody) gid=65534(nogroup) groups=65534(nogroup)
Safe Mode:OFF
Open_Basedir:OFF
Freespace:24.83 GB of 70.42 GB (35.26%)
MySQL: ON MSSQL: OFF Oracle: OFF PostgreSQL: OFF Curl: OFF Sockets: ON Fetch: OFF Wget: ON Perl: ON
Disabled Functions: pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,

/ usr/ share/ doc/ libsnmp-session-perl/ examples/ - drwxr-xr-x

Directory:
Viewing file:     test-table.pl (586 B)      -rwxr-xr-x
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
#!/usr/bin/perl -w
#
# Regression tests for code used by table walking

require 5.003;

use strict;

use BER;
use SNMP_Session;

&ic_test;
1;

sub ic_test () {
  ic_test_1 ("1.2.3","1.2.4",-1);
  ic_test_1 ("1.2.3","1.2.3",0);
  ic_test_1 ("1.2.4","1.2.3",1);
  ic_test_1 ("1.2.29.1","1.2.3.2",1);
  ic_test_1 ("1.2.29.1","1.2.3",1);
  ic_test_1 ("1.2.29","1.2.3.32",1);
}

sub ic_test_1 ($$$) {
  my ($oid1, $oid2, $wanted) = @_;
  my $result;
  die "index_compare(\"$oid1\",\"$oid2\") == $result, should be $wanted"
       unless ($result = index_compare ($oid1,$oid2)) == $wanted;
}
Command:
Quick Commands:
Upload:
[Read-Only] Max size: 100MB
PHP Filesystem: <@ Ú
Search File:
regexp
Create File:
Overwrite [Read-Only]
View File:
Mass Defacement:
[+] Main Directory: [+] Defacement Url:
LmfaoX Shell - Private Build [BETA] - v0.1 -; Generated: 0.2902 seconds