Help for this page

Select Code to Download


  1. or download this
    $ perl -E 'my @x = (1,2,3); say ">@x<"'
>1 2 3<
  2. or download this
    $ perl -E 'my @x = "1.234 5.6789 -1.235" =~ /(-?\d+?\.?\d+)/g; say "@x
+"'
1.234 5.6789 -1.235

$ perl -E 'my @x = "1.234 5.6789-12.235" =~ /(-?\d+?\.?\d+)/g; say "@x
+"'
1.234 5.6789 -12 235
  3. or download this
    $ perl -E '"1.234 5.6789 -1.235" =~ /^(-?\d+?\.?\d+)\s*(-?\d+?\.?\d+)\
+s*(-?\d+?\.?\d+)$/; say "@{^CAPTURE}"'
1.234 5.6789 -1.235

$ perl -E '"1.234 5.6789-12.235" =~ /^(-?\d+?\.?\d+)\s*(-?\d+?\.?\d+)\
+s*(-?\d+?\.?\d+)$/; say "@{^CAPTURE}"'
1.234 5.6789 -12.235