=pod

=head1 NAME

Package::Transporter::Generator::Potential::After_END - Subroutines from the same package after END

=head1 SYNOPSIS

	use Package::Transporter sub{eval shift}, sub {
		my $generator = $_[0]->create_generator(
			'::After_END', 	__FILE__);
		$_[0]->register_potential($generator, 'FOR_SELF');
	};
	
	yn(!potentially_defined('hello_worlds'));
	yn(potentially_defined('hello_world'));
	yn(!defined(&hello_world));
	
	hello_world();
	
	yn(defined(&hello_world));
	exit(0);
	
	__END__
	sub yn {
		print STDOUT ($_[0] ? 'Yes' : 'No'), "\n";
	}
	
	sub hello_world {
		print "Hello World.\n";
	}
	
	
=head1 DESCRIPTION

Copies the missing subroutine from the same package itself, but after __END__.

Prototype definitions aren't supported, yet. No logging, no caching either. Breaks the taint concept by accidentally using $1 but without checking whether the file is trustworthy. (So much about the robustness of taint, the auditors nightmare.)

=head1 ANYTHING ELSE

Please see the documentation of the upstream package L<Package::Transporter>.

=cut
