Array-Extract

 view release on metacpan or  search on metacpan

inc/Module/Install.pm  view on Meta::CPAN

	my $who  = $self->_caller;
	my $cwd  = Cwd::cwd();
	my $sym  = "${who}::AUTOLOAD";
	$sym->{$cwd} = sub {
		my $pwd = Cwd::cwd();
		if ( my $code = $sym->{$pwd} ) {
			# Delegate back to parent dirs
			goto &$code unless $cwd eq $pwd;
		}
		unless ($$sym =~ s/([^:]+)$//) {
			# XXX: it looks like we can't retrieve the missing function
			# via $$sym (usually $main::AUTOLOAD) in this case.
			# I'm still wondering if we should slurp Makefile.PL to
			# get some context or not ...
			my ($package, $file, $line) = caller;
			die <<"EOT";
Unknown function is found at $file line $line.
Execution of $file aborted due to runtime errors.

If you're a contributor to a project, you may need to install
some Module::Install extensions from CPAN (or other repository).

lib/Array/Extract/Example.pod  view on Meta::CPAN


=head1 DESCRIPTION

While I normally use OmniFocus as a GTD tool to manage my todo lists,
sometimes I want to collaborate on a todo list with someone else and
I don't want them to have to use a complicated and expensive tool.
I've often found in this situation a simple shared text file is the way
to go.  A file on the office fileserver, or in a shared Dropbox folder,
in a obvious format that any can understand with a glance.

Here's what one looks like:

  [X] (extract) Complete coding
  [X] (extract) Get Zefram to code review my code
  [X] (yapc) Write talk submission for YAPC::NA
  [X] (yapc) submit talk proposal with ACT
  [ ] (extract) Write Array::Extract::Example document
  [ ] (extract) Check in and push to github
  [ ] (extract) Upload to CPAN
  [ ] (extract) Publish a blog post about it



( run in 0.412 second using v1.01-cache-2.11-cpan-64827b87656 )