in reply to List::Util max with block
$max_el = max( map { complex_calculation($_) } @list); [download]