Help for this page

Select Code to Download


  1. or download this
    FLINTSTONES -- BARNEY, FRED, WILMA
JETSONS -- MAX, TONY, WILMA
SIMPSONS -- LISA, BARNEY, WILMA, HOMER
ALCATRAZ -- ELIJAH, MAX, WILMA
  2. or download this
    my %is_in_show = (
   MAX    => [ 'JETSONS', 'ALCATRAZ' ],
...
   ELIJAH => [ 'ALCATRAZ' ],
   ...
);
  3. or download this
    while (<FILE>) {
   chomp;
...
      push(@{$is_in_show{$name}}, $show);
   }
}
  4. or download this
    use strict;
use warnings;
...
JETSONS -- MAX, TONY, WILMA
SIMPSONS -- LISA, BARNEY, WILMA, HOMER
ALCATRAZ -- ELIJAH, MAX, WILMA