%h = (x=>1, x => 2); $a x 3; $a x3; $a x= 2; $a x-1; x(); $a->x; @a = (1) x 5; $a = 'a'x3;