# HG changeset patch # User Dario Sestito # Date 1276685086 -3600 # Node ID 598059d917c37181483d262c7559908aec2901a4 # Parent 047e37a8f43f2391629f392c19d0a1daa6266e68 Restructure envinfo help diff -r 047e37a8f43f -r 598059d917c3 envinfo/envinfo.pl --- a/envinfo/envinfo.pl Wed Jun 16 11:36:40 2010 +0100 +++ b/envinfo/envinfo.pl Wed Jun 16 11:44:46 2010 +0100 @@ -34,12 +34,20 @@ if ($help) { - print "Dumps environment info such as tools version to cmdline and/or to a file\n"; - print "Compare info with a baseline\n"; - print "Usage: perl envinfo.pl [OPTIONS]\n"; - print "where OPTIONS are:\n"; - print "-r,--report [FILE]\tCreate report file (default \\output\\logs\\envinfo.txt)\n"; - print "-c,--compare [LOCATION]\tCompare environment with info at LOCATION (default \\build_info\\logs\\envinfo.txt)\n"; +print <<_EOH; +envinfo +Dumps environment info such as tools version to cmdline and/or to a file +Compare info with a baseline + +Usage: envinfo.pl [options] + +Options: + -h, --help Show this help message and exit + -r,--report [FILE] Write report to FILE (default \\output\\logs\\envinfo.txt) + -c,--compare [LOCATION] + Compare environment with info at LOCATION + (default \\build_info\\logs\\envinfo.txt) +_EOH exit(0); }