Select Code to Download

$hash{$item,($item -1)} = $hash{ ($item -1), $item};

@hash{$item, ($item - 1)} = @hash{($item - 1), $item};