Help for this page
TEMP_HASH_BLOCK: { my %temphash; @temphash{@array1} = (); delete @temphash{@array1}; my @newarray = keys %temphash; }
my @newarray = do { my %temphash; @temphash{@array1} = (); delete @temphash{@array1}; keys %temphash; };