Select Code to Download

$machinearray{$machine}{$user}++;

if (exists $machinearray{$machine}{$user})

keys %{$machinearray{$machine}};