my %hash=(
opt1=>\&opt1,
opt2=>\&opt2,
opt3=>\&opt3,);

&{$hash{$value}};