>perl -anE "BEGIN { $threshold = shift; } say $F[0] if $F[2] > $threshold;" 1e-50 data.txt