:MoveTo not working in online mode?

repeat wait() until game.Players:FindFirstChild("CurrentPlayer")
local player = game.Players.CurrentPlayer
print(player.Value)
local chr
function appear()
	cln = game.ServerStorage:FindFirstChild(""):Clone()
	cln.Parent = game.Workspace
	chr = game.Workspace:FindFirstChild(player.Value).Torso
	cln:MoveTo(chr.Position + chr.CFrame.lookVector*15)
	cln.Monster.WalkSpeed = 10
	cln.Monster:MoveTo(chr.Position, chr)
	wait(1)
	cln.Monster.WalkSpeed = 0
end

function disappear()
	cln:Destroy()
end

while wait(math.random(5,25)) do
	appear()
	wait(2)
	disappear()
end

So I just created this script which should clone a monster from ServerStorage and put him in Workspace, this part works perfectly. The monster should then walk toward the player for a second and stop, this part doesn't work. The player variable is correct its value is the player's name... any suggestions?