From: Bram Date: Fri, 16 May 2008 14:44:07 +0000 (-0700) Subject: [perl #39187] [DOC-PATCH]: perldoc -f reverse: examples (was: RE: Perlfunc needs... X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9649ed94a18776bcf75c3267a2d02b0759ed80be;p=p5sagit%2Fp5-mst-13.2.git [perl #39187] [DOC-PATCH]: perldoc -f reverse: examples (was: RE: Perlfunc needs to be made more clear regarding reverse in scalar context.) From: "Bram via RT" Message-ID: p4raw-id: //depot/perl@33840 --- diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index 99acb78..764deb0 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -4718,13 +4718,16 @@ of LIST in the opposite order. In scalar context, concatenates the elements of LIST and returns a string value with all characters in the opposite order. - print reverse <>; # line tac, last line first + print join(", ", reverse "world", "Hello"); # Hello, world - undef $/; # for efficiency of <> - print scalar reverse <>; # character tac, last line tsrif + print scalar reverse "dlrow ,", "olleH"; # Hello, world Used without arguments in scalar context, reverse() reverses C<$_>. + $_ = "dlrow ,olleH"; + print reverse; # No output, list context + print scalar reverse; # Hello, world + This operator is also handy for inverting a hash, although there are some caveats. If a value is duplicated in the original hash, only one of those can be represented as a key in the inverted hash. Also, this has to