X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSwitch.pm;h=1c130c3d5e7f89d53d8ee29c7956df0a2465d3e6;hb=c1e8580e8ecd78fc1f67b0caa695b9884a700d93;hp=84e28907e6b9a05d540892c7f9718d44919f3998;hpb=b2486830aef359160f82c24b5ca8d2f237006c0a;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/Switch.pm b/lib/Switch.pm index 84e2890..1c130c3 100644 --- a/lib/Switch.pm +++ b/lib/Switch.pm @@ -4,7 +4,7 @@ use strict; use vars qw($VERSION); use Carp; -$VERSION = '2.10'; +$VERSION = '2.10_01'; # LOAD FILTERING MODULE... @@ -681,7 +681,7 @@ Fall-though (trying another case after one has already succeeded) is usually a Bad Idea in a switch statement. However, this is Perl, not a police state, so there I a way to do it, if you must. -If a C block executes an untargetted C, control is +If a C block executes an untargeted C, control is immediately transferred to the statement I the C statement (i.e. usually another case), rather than out of the surrounding C block. @@ -713,7 +713,7 @@ For example: case /\d/ { handle_dig_any(); } } -If an untargetted C statement is executed in a case block, this +If an untargeted C statement is executed in a case block, this immediately transfers control out of the enclosing C block (in other words, there is an implicit C at the end of each normal C block). Thus the previous example could also have been @@ -850,7 +850,8 @@ and requires both these modules to be installed. =head1 AUTHOR -Damian Conway (damian@conway.org) +Damian Conway (damian@conway.org). The maintainer of this module is now Rafael +Garcia-Suarez (rgarciasuarez@free.fr). =head1 BUGS