for my $t (@log)
{
    # ...
}