Re: Parsing a text file to get the location of the latest

Here is how I'd do it:

set newest-date to empty
set this-record to empty
LOOP: read a record
if record is not approved, go to LOOP.
if the build Date is > newest-date then move the record to this-record and set newest-date
goto LOOP

What does your code look like?

Update: This code is already"Pythonized". Perhaps your meant "Haskellized"?

----
I Go Back to Sleep, Now.

OGB

Comment on Re: Parsing a text file to get the location of the latest

Replies are listed 'Best First'.
Re^2: Parsing a text file to get the location of the latest by NetWallah (Canon) on Nov 03, 2012 at 04:47 UTC
This one-line does the job (With your current sample data): `perl -000 -ne '($l,$d)=m/Location:\s+(\S+).+BuildDate:\s+(\d.+\d)/s; ( +$lm,$ld)=($l,$d) if $d gt $ld and m/Approved/s}{print qq\|$lm\n\|' YOUR +-FILE-NAME.txt` [download] Note1 - the Date compare logic is very weak - it simply does a textual compare. Note2 - "Approved" verification is very weak. This is a working sample - you can use it to build a more robust program. Change single-quotes to double, if you use Window$. Update: Oops - I had intended to respond to the original post - but got OGB's post instead. Sorry. "By three methods we may learn wisdom: First, by reflection, which is noblest; Second, by imitation, which is easiest; and third by experience, which is the bitterest." -Confucius	[reply] [d/l]

Replies are listed 'Best First'.

Re^2: Parsing a text file to get the location of the latest
by NetWallah (Canon) on Nov 03, 2012 at 04:47 UTC

perl -000 -ne '($l,$d)=m/Location:\s+(\S+).+BuildDate:\s+(\d.+\d)/s; (
+$lm,$ld)=($l,$d) if $d gt $ld and m/Approved/s}{print qq|$lm\n|' YOUR
+-FILE-NAME.txt
[download]

Update: Oops - I had intended to respond to the original post - but got OGB's post instead. Sorry.

"By three methods we may learn wisdom: First, by reflection, which is noblest; Second, by imitation, which is easiest; and third by experience, which is the bitterest." -Confucius

[reply]
[d/l]