Changeset 11830 for docs/Perl6/FAQ

Timestamp:

07/31/06 05:59:09 (2 years ago)

Author:

audreyt

Message:

* Perl6::FAQ::Capture - remove prefix * and change it to prefix [,]

Files:

• docs/Perl6/FAQ/Capture.pod (modified) (6 diffs)

docs/Perl6/FAQ/Capture.pod

@@ -53 +53 @@
 
   # passing the opaque Capture as actual function arguments  
-  my $car = make_car(*$car_cap);
+  my $car = make_car([,]=$car_cap);
 
   # extracting a specific positional argument
@@ -161 +161 @@
 argument overrides the previous ones.
 
-=head3 What do *$x, *@x and *%x mean?
-
-The prefix C<*> method casts an object into a Capture object, and merges
-it into the Capture currently being constructed (e.g. an argument list):
+=head3 What do [,]$x, [,]@x and [,]%x mean?
+
+The prefix C<[,]> operator casts objects into Captures, and merges them
+t into the Capture currently being constructed (e.g. an argument list):
 
     my $cap = \(1, 2, x=>42);
-    f(*$cap);   # f(1, 2, x=>42)
+    f([,] =$cap);   # f(1, 2, x=>42)
 
 Array, List, Hash and Pair objects cast into Capture objects in obvious
 ways:
 
-    my $a = [1, 2];     f(*$a);     # f(1, 2)
-    my $l = (1, 2);     f(*$l);     # f(1, 2)
-    my $h = {x => 42};  f(*$h);     # f(x => 42)
-    my $p = (x => 42);  f(*$p);     # f(x => 42)
-
-It also works with the C<@> and C<%> sigils:
-
-    my @a = (1, 2);     f(*@a);     # f(1, 2)
-    my @a := [1, 2];    f(*@a);     # f(1, 2)
-    my %h = (x => 42);  f(*%a);     # f(x => 42)
-    my %h := {x => 42}; f(*%h);     # f(x => 42)
+    my $a = [1, 2];     f([,] @$a);     # f(1, 2)
+    my $l = (1, 2);     f([,] @$l);     # f(1, 2)
+    my $h = {x => 42};  f([,] %$h);     # f(x => 42)
+    my $p = (x => 42);  f([,] %$p);     # f(x => 42)
+
+It also works with C<@> and C<%> variables:
+
+    my @a = (1, 2);     f([,] @a);     # f(1, 2)
+    my @a := [1, 2];    f([,] @a);     # f(1, 2)
+    my %h = (x => 42);  f([,] %a);     # f(x => 42)
+    my %h := {x => 42}; f([,] %h);     # f(x => 42)
 
 
@@ -236 +236 @@
 Yes, using the C<\$> signature:
 
-    sub f (\$args) { g(*$args) }
+    sub f (\$args) { g([,] =$args) }
     f(1, 2, x => 42);   # same as g(1, 2, x => 42)
 
@@ -248 +248 @@
 
   method front_meth {
-    $!real_obj.back_meth( *@_, *%_ );
+    $!real_obj.back_meth( [,] @_, %_ );
   }
 
@@ -255 +255 @@
 
   method front_meth (\$args) {
-    $!real_obj_A.back_meth( *$args );
+    $!real_obj_A.back_meth( [,] =$args );
   }
 
@@ -349 +349 @@
 In the context of rules, Captures are superclasses of Match. So in the example of:
     
-    my $rv = ("x-y-z-moose" ~~ /(.)-(.)-(.)-<animal> :{ return give_birth(*$/) })
+    my $rv = ("x-y-z-moose" ~~ /(.)-(.)-(.)-<animal> :{ return give_birth([,] =$/) })
 
 C<give_birth()> gets called with 'x', 'y', and 'z' as positional arguments,