Select Code to Download

use strict;
use warnings;
...
                             ];

$cycle && $cycle->($_) for (@names);

tom plays
harry eats
...
nick plays
sally eats
henry sleeps