sub report_row {
    my $object = shift;
    $object->op1();
    $object->op2(); # op2 is very slow
    $object->op3();
}

report_row($_) for ( @objects );


##</code><code>##


$_->op1() for ( @objects );

# bulk_op2 does the same job as op2 but with all objects in
# one shot
bulk_op2(@objects); 

$_->op3() for ( @objects );