Help for this page

Select Code to Download


  1. or download this
    0. Amber B. was harmed by J.
1. Kim B. was harmed by B F K.
2. Kim W. was harmed by A I J.
  2. or download this
      for (@name) {
    s/\s+$//;
    my $int = s/^(\d+\.\s+\w+\s+\w).*$/$1\. /;
    say "int is $int"; 
  }
  3. or download this
      for  (@harm) {
    s/\s+$//;
    my $int = s/^\d+\.\s+(\w.*)$/was harmed by $1\./;
    say "schmint is $int";
  }