@a = qw/P, e, r, l/; print @a;