open(IN, "access_log") || die "Can't open file: $!";
while(<IN>) {
    ... process the line ...
}
close(IN);