sub { print @_ }->($_) for @arr;