Help for this page

Select Code to Download

Select or download this

  ...
  if ($x =~ m/^Patient/) {
...
    last WID;
  }
  ...