$module = "bigfloat"; qx(perl -M$module -e 'exit' 2>/dev/null); print "$module is not installed !!\n" if $? != 0;