anchor.diff:  ///  - `server` - Ftp Server name (ex: "ftp://10.100.200.300:21/")
   ///  - `user` - Ftp Server login name (ex: "joebloggs")
   ///  - `pwd` - Ftp Server login password (ex: "J0Eblogg5")
  -let isFolderPresent server user pwd (destPath:string) =
  -    destPath |> lastSlashPos |> destPath.Substring |> checkInExistingDirList server user pwd destPath
  +let isFolderPresent server user pwd (destPath : string) = 
  +    destPath
  +    |> lastSlashPos
  +    |> destPath.Substring
  +    |> checkInExistingDirList server user pwd destPath
   
   /// Creates a matching folder in ftp folder, if not already present
   /// ## Parameters
  
positive.code: /// Uses `Passive Mode` FTP and handles all files as binary (and not ASCII)
  /// Assumes direct network connectivity to destination Ftp server (not via a proxy)
  /// Does not support FTPS and SFTP
  
  module Fake.FtpHelper
  
  open System
  
negative.code: ///  - `server` - Ftp Server name (ex: "ftp://10.100.200.300:21/")
  ///  - `user` - Ftp Server login name (ex: "joebloggs")
  ///  - `pwd` - Ftp Server login password (ex: "J0Eblogg5")
  let uploadAFile (server : string) (user : string) (pwd : string) (destPath : string) (srcPath : string) = 
      logfn "upload %s from to %s" srcPath destPath
      let fl = new FileInfo(srcPath)
      if (fl.Length <> 0L) then 
          destPath
          |> fun d -> getServerInfo (sprintf "%s/%s" server d) user pwd WebRequestMethods.Ftp.UploadFile
          |> fun si -> 
              use fs = new FileStream(srcPath, FileMode.Open, FileAccess.Read)
              use br = new BinaryReader(fs, new System.Text.UTF8Encoding())
              use reqStrm = si.Request.GetRequestStream()
              writeChunkToReqStream (br.ReadBytes 1024) reqStrm br
  
  /// Given a folder name, will check if that folder is present at a given root directory of a ftp server
  /// ## Parameters
  ///  - `server` - Ftp Server name (ex: "ftp://10.100.200.300:21/")
  ///  - `user` - Ftp Server login name (ex: "joebloggs")
  ///  - `pwd` - Ftp Server login password (ex: "J0Eblogg5")
  let private checkInExistingDirList server user pwd destPath fname = 
      destPath
      |> lastSlashPos
      |> getSubstring 0 destPath
      |> getFtpDirContents server user pwd
      |> regexCheck fname
  
  /// Given a folder path, will check if that folder is present at a given root directory of a ftp server
  /// ## Parameters
  