Help for this page
use Getopt::Long; use strict; ... "read" => \$read, "generate" => \$generate, );
if ($read) { - code snippets - }
my ($read,$generate,$help); # option switches GetOptions ( ... "g" => \$generate, "generate" => \$generate, );