Help for this page

Select Code to Download

Select or download this

if (m#([^\|]+)\|([^\|]+)$#) {
  $a=$1; $b=$1;
}
else { chomp; die "Bad line: $_\n"; }

Select or download this
```
($a,$b,$c) = m/(your)(regex)(here)/;
```