Once you load the "license" file into the hash, you would add a new key (which is the hostname of the laptop) and its value is taken/extracted from one of the values of the anonymous array of the "unassigned" key.
For example:
Code:
$licenses{ $ENV{'COMPUTERNAME'} } = shift @{ $licenses{ 'UNASSIGNED' } };
After that, you rewrite the "license" file with the data in the %licenses hash.