##############################################
# I-Mall explo
# Spawn bash style Shell with webserver uid
# Greetz z\, spax, foxtwo, Zone-H
# This Script is currently under development
##############################################
use strict;
use IO::Socket;
my $host;
my $port;
my $command;
my $url;
my $shiz;
my @results;
my $probe;
...