select (LIST) { block; } select $var (LIST) { block; } select my|local|our $var (LIST) { block; } #### LIST2 = select {block;} LIST; #### LIST2 = select /expr/, LIST;