Select Code to Download

use strict;
use Data::Dumper;
...
  }
  return wantarray ? @_ : $Q;
}

$option1=a
$option2=
...
$option1=a
$option2=b
$option3=c