Help for this page
use Tie::File; ... split; print $_[1]; # = AWK's $2 }
awk '/42/ {print $2}' defines.h