$self->pre();
        open my $fh, '<', $self->{file} or croak "could not open $self->{file}: $!";
        while (my $record = <$fh>) {
                chomp $record;
                $self->{record} = $record;
                $self->loop();
                $self->{hash}{ $self->{key} } = $self->{value};
                ++$self->{count};
        }
        $self->post();