$thisname{'frank'} = 1;
$thisname{'lee'} = 2;
$hashname = 'thisname';
print keys(%$hashname);

##</code><code>##

use strict('subs');
$thisname{'frank'} = 1;
$thisname{'lee'} = 2;
$hashname = 'thisname';
print keys(%$hashname);

##</code><code>##

use strict('refs');
$thisname{'frank'} = 1;
$thisname{'lee'} = 2;
$hashname = 'thisname';
print keys(%$hashname);