Help for this page

Select Code to Download


  1. or download this
    ...
  for my $line (@myin) {
    $line =~ s!$full!$abb!g;
  };
...
  2. or download this
    ...
  for my $line (@myin) {
    $line =~ s!\b$full\b!$abb!g;
  };
...