%Log_rooms = (one => 1, two => 2, three => 3); # we are in the "main" package here

package Cybro_Item;

print join "\n", keys %main::Log_rooms;