view release on metacpan or  search on metacpan

lib/Conan/Promote/Xen.pm  view on Meta::CPAN

package Conan::Promote::Xen;

sub new {
	my $class = shift;
	my $args = {
		@_,
	};

	return bless $args => $class;
}

sub update_image {
	my $self = shift;
	my ($node, $target) = @_;

	print "D: Upgrading $node to $target\n";
}

1;