my $ftp =  Net::FTP->new($xlight_server_ip, Debug => 0) or log_error ("Cannot connect") ;  
$ftp->login($user,$pass) or log_error ("Cannot login ") ;
$ftp->cwd($dest_dir) or log_error ("Cannot change working directory ") ;  
$ftp->put($file_to_send);