@a = map {$_ eq "a" ? ("#","a") : $_} @a;