for my $file (@files) {
    $line = $file->getline;
}