Select Code to Download

my @array = ("1","Option 1","2","Option 2","3","Option 3","4","Option 
+4");
my @quoted = map { "'$_'" } @array;

sub make_menu_items {
    my $items = shift;
...
    }
    return \@quoted;
}