Help for this page

Select Code to Download


  1. or download this
    s/ ^ \b (?<head> [ \w \s \[ \] ]+ \s+ \( ) $ 
            (?<body> .*? ^\)$ ) 
    ...
         unless $+{head} ~~ m|^\w+?clk\[\d\]|;
       $+{head} . $+{body}
     /gemsx;
    
  2. or download this
    doit if $x ~~ / (?<x1> \w+)\s+(?<x2> \w+) /x and
            $y ~~ / (?<y1> \w+)\s+(?<y2> \w+) /x and
            $+{x1} . $+{y2} eq $+{y1} . $+{x2};
    
  3. or download this
    {
        my %+;
    ...
                $y ~~ / (?<y1> \w+)\s+(?<y2> \w+) /x and
                $+{x1} . $+{y2} eq $+{y1} . $+{x2};
    }