my @array = qw(1 2 3);
@array = qw(one two three) if $op eq 'alpha';