chomp($record = <DATA>);
$keys{$_} = $c++ for split / /, $record;

## Get last record and put it in $record
@record = split / /, $record;
print $record[$keys{'timestamp'}];