Rev 330 | Rev 332 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 330 | Rev 331 | ||
|---|---|---|---|
| Line 1... | Line 1... | ||
| 1 | #!/usr/bin/perl -w
|
1 | #!/usr/bin/perl -w
|
| 2 | use strict; |
2 | use strict; |
| 3 | # $Id: inventory.pl 330 2008-12-29 19:49:46Z agaran $
|
3 | # $Id: inventory.pl 331 2008-12-29 20:05:13Z agaran $
|
| 4 | # Thu, 13 Nov 2008 21:06:23 +0100
|
4 | # Thu, 13 Nov 2008 21:06:23 +0100
|
| 5 | # Maciej 'agaran' Pijanka <agaran@pld-linux.org>
|
5 | # Maciej 'agaran' Pijanka <agaran@pld-linux.org>
|
| 6 | # for OpenARM SBC Project
|
6 | # for OpenARM SBC Project
|
| 7 | # license: gpl v3
|
7 | # license: gpl v3
|
| 8 | 8 | ||
| Line 71... | Line 71... | ||
| 71 | print "Basic help\n\t--showrc|showconf shows current configuration\n". |
71 | print "Basic help\n\t--showrc|showconf shows current configuration\n". |
| 72 | "\t--docdir|-d <dir> tells script where information.txt files should be searched\n". |
72 | "\t--docdir|-d <dir> tells script where information.txt files should be searched\n". |
| 73 | "\t--define <something>=<somethingelseornot> defines some configration value\n". |
73 | "\t--define <something>=<somethingelseornot> defines some configration value\n". |
| 74 | "\t--verbose|-v [level] sets verbosity level\nOrder of options DOES matter\n". |
74 | "\t--verbose|-v [level] sets verbosity level\nOrder of options DOES matter\n". |
| 75 | "\t--bomdir|-b <dir> tells script where boms should be searched\n". |
75 | "\t--bomdir|-b <dir> tells script where boms should be searched\n". |
| 76 | "\t--output|-o <file> tells where script shall save output data\n". |
76 | "\t--outfile|-o <file> tells where script shall save output data\n". |
| 77 | "\t--force|-f forces script to save data even if file exist already\n"; |
77 | "\t--force|-f forces script to save data even if file exist already\n"; |
| 78 | 78 | ||
| 79 | print "\t\e[0;31mThis Help Is created especially for \e[0;33mJelle\e[0;29m\n". |
79 | print "\t\e[0;31mThis Help Is created especially for \e[0;33mJelle\e[0;29m\n". |
| 80 | "\tThis script search all directories below specified ones to find interesting files\n"; |
80 | "\tThis script search all directories below specified ones to find interesting files\n"; |
| 81 | return; |
81 | return; |