> Var B: > $ssh_opts = ['-c', 'blowfish']; > > sub migrate { > my ($class, $node, $nodeip, $vmid, $opts, $ssh_opts) = @_; That is OK for me.