r42502 - in /branches/upstream/libend-perl/current: Changes MANIFEST META.yml README lib/End.pm
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Sat Aug 22 19:48:05 UTC 2009
Author: jawnsy-guest
Date: Sat Aug 22 19:47:59 2009
New Revision: 42502
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=42502
Log:
[svn-upgrade] Integrating new upstream version, libend-perl (2009081101)
Added:
branches/upstream/libend-perl/current/Changes
branches/upstream/libend-perl/current/README
Modified:
branches/upstream/libend-perl/current/MANIFEST
branches/upstream/libend-perl/current/META.yml
branches/upstream/libend-perl/current/lib/End.pm
Added: branches/upstream/libend-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libend-perl/current/Changes?rev=42502&op=file
==============================================================================
--- branches/upstream/libend-perl/current/Changes (added)
+++ branches/upstream/libend-perl/current/Changes Sat Aug 22 19:47:59 2009
@@ -1,0 +1,3 @@
+Version 2009081101
++ Created Changes.
++ Added README to MANIFEST.
Modified: branches/upstream/libend-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libend-perl/current/MANIFEST?rev=42502&op=diff
==============================================================================
--- branches/upstream/libend-perl/current/MANIFEST (original)
+++ branches/upstream/libend-perl/current/MANIFEST Sat Aug 22 19:47:59 2009
@@ -2,4 +2,6 @@
MANIFEST
Makefile.PL
t/000_tests.t
+README
+Changes
META.yml Module meta-data (added by MakeMaker)
Modified: branches/upstream/libend-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libend-perl/current/META.yml?rev=42502&op=diff
==============================================================================
--- branches/upstream/libend-perl/current/META.yml (original)
+++ branches/upstream/libend-perl/current/META.yml Sat Aug 22 19:47:59 2009
@@ -1,13 +1,21 @@
--- #YAML:1.0
-name: End
-version: 2009040201
-abstract: ~
-license: ~
-author:
+name: End
+version: 2009081101
+abstract: ~
+author:
- Abigail <cpan at abigail.be>
-generated_by: ExtUtils::MakeMaker version 6.42
-distribution_type: module
-requires:
+license: unknown
+distribution_type: module
+configure_requires:
+ ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
+requires: {}
+no_index:
+ directory:
+ - t
+ - inc
+generated_by: ExtUtils::MakeMaker version 6.50
meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.3.html
- version: 1.3
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
Added: branches/upstream/libend-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libend-perl/current/README?rev=42502&op=file
==============================================================================
--- branches/upstream/libend-perl/current/README (added)
+++ branches/upstream/libend-perl/current/README Sat Aug 22 19:47:59 2009
@@ -1,0 +1,69 @@
+NAME
+ End - generalized END {}.
+
+SYNOPSIS
+ use End;
+
+ { my $foo = end {print "Leaving the block\n"};
+ ...
+ last; # prints "Leaving the block\n".
+ ...
+ }
+
+DESCRIPTION
+ The module "End" exports a single subroutine "end", which allows you to
+ set up some code that is run whenever the current block is exited,
+ regardless whether that is due to a "return", "next", "last", "redo",
+ "exit", "die", "goto" or just reaching the end of the block.
+
+ To be more precise, "end" returns an object, that will execute the code
+ when the object is destroyed; that is, when the variable assigned to
+ goes out of scope. If the variable is lexical to the current block, the
+ code will be executed when leaving the block.
+
+ One can force premature execution of the code by undefining the variable
+ assigned to, or assigning another value to the variable.
+
+ "end" only takes one argument, a code reference. If one wishes the code
+ reference to take arguments, wrapping the code reference in a closure
+ suffices.
+
+BUGS
+ Due to a bug in Perl 5.6.0 (and perhaps before), anonymous subroutines
+ that are not a closure will not go out of scope, not even on program
+ termination. That is why "end" wraps the code fragment in a closure.
+
+ There is a second bug in Perl 5.6.0 (and perhaps before) why this is
+ necessary. If the code fragment isn't wrapped in another code reference,
+ the original subroutine will be blessed in the package, making that
+ "ref" on that code no longer returns the right value.
+
+DEVELOPMENT
+ The current sources of this module are found on github,
+ <git://github.com/Abigail/end.git>.
+
+AUTHOR
+ This package was written by Abigail, <mailto:cpan at abigail.be>
+
+COPYRIGHT & LICENSE
+ Copyright (C) 2000 - 2009, Abigail
+
+ Permission is hereby granted, free of charge, to any person obtaining a
+ copy of this software and associated documentation files (the
+ "Software"), to deal in the Software without restriction, including
+ without limitation the rights to use, copy, modify, merge, publish,
+ distribute, sublicense, and/or sell copies of the Software, and to
+ permit persons to whom the Software is furnished to do so, subject to
+ the following conditions:
+
+ The above copyright notice and this permission notice shall be included
+ in all copies or substantial portions of the Software.
+
+ THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+ OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+ IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+ DEALINGS IN THE SOFTWARE.
+
Modified: branches/upstream/libend-perl/current/lib/End.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libend-perl/current/lib/End.pm?rev=42502&op=diff
==============================================================================
--- branches/upstream/libend-perl/current/lib/End.pm (original)
+++ branches/upstream/libend-perl/current/lib/End.pm Sat Aug 22 19:47:59 2009
@@ -11,7 +11,7 @@
our @ISA = qw /Exporter/;
our @EXPORT = qw /end/;
-our $VERSION = '2009040201';
+our $VERSION = '2009081101';
sub end (&) {
my $code = shift;
More information about the Pkg-perl-cvs-commits
mailing list