my %ARGS = map {$_,1} @ARGV;

##</code><code>##

if($ARGS{foo}) { ... }

##</code><code>##

my %ARGS = @ARGV;

##</code><code>##

if($ARGS{rebuild} eq 'all') { ... }