Παζλ λυμένα από τον perl