#!perl -lp $_=2<<1.443*log