Help for this page

Select Code to Download

Select or download this

$/ = sub {
  my ($line) = @_; 
  $line =~ m{Separator\s+\d+};
};