my $category = $cmdline{c} || 'Test'; my $quote_symbol = $cmdline{q} or die "No quote symbol."; my $ref_symbol = $cmdline{r} or die "No reference symbol."; my $engine = $cmdline{e} or die "No engine."; my $session = $cmdline{d}; my $limit = $cmdline{l} or die "No limit."; my $max_limit = $cmdline{x} or die "No max limit."; my $modus = $cmdline{m} || ''; my $size = $cmdline{s} || $cmdline{v} or die "No size or volume.";