use Common; use Output; use Analysis; &Output::beginlogging; #process file line by line while ( $record = ) { etc...