use Getopt::Long;
use Net::SSH qw(sshopen2);
use Net::Ping;
use Net::FTP;
...