my %actions = ( GetAll => 0x001, Make => 0x010, MakeOnly => 0x100, ... ); $_->{Suppress} = 0x001 if ($_->{Action} & ( $actions{GetAll} | $actions{Make} | $actions{MakeOnly} ); #### .