$pleasework = eval{$$package::a};
print $pleasework;