Help for this page

Select Code to Download


  1. or download this
       @a = ('hello(\w+)', ...);
  2. or download this
       $a = "Hello(world)";
   $b = shift(@a);

...
   {
       print "Matched!\n";
   }
  3. or download this
       @a = ('hello\((\w+)\)', ...);