Quote:
Originally Posted by Gudy
Yes, please! Needing to look at the Perl source code to learn about the possible parameters sucks,
|
The code is easy, something like:
Code:
# Get parameters
$bookname=shift @ARGV;
$param1=shift @ARGV;
$param2=shift @ARGV;
# When not enough parameters, generate user help
unless ( $bookname ) {
die
"\nProgram to extract html from mobifile\n
Version xxx.yyy.zzz
Author: Me
Usage: Mobi2html bookname --parameter1 --parameter2 --etc\n";
}