package MyModuleBuilder;
use Module::Build;
@ISA = qw(Module::Build);
	sub ACTION_dist {
		my $self = shift;
		eval {
			use Pod::Text;
			print "Creating the README file.\n";
			my $parser = Pod::Text->new();
			$parser->parse_from_file('lib/IO/Socket/Multicast6.pm', 'README');
		};
		$self->SUPER::ACTION_dist(@_);
	}

1;