package P; $A = 'something';