use FindBin;
use lib $FindBin::Bin;
use Getopt::Std;
use Socket;
my $SOCKET = “”;
/usr/share/bed/bed.pl -s FTP -t 192.168.77.146 -u Anonymous -v Anonymous
use FindBin;
use lib $FindBin::Bin;
use Getopt::Std;
use Socket;
my $SOCKET = “”;
/usr/share/bed/bed.pl -s FTP -t 192.168.77.146 -u Anonymous -v Anonymous