Help for this page

Select Code to Download

Select or download this

my $genre = $genres[0];

...
    /^(?:Action|Adventure|War)$/ && $genre = 'Action & Adventure';
    /^(?:Kids|Family)$/ && $genre = 'Kids & Family';
}