perl -wle 'print join "",("p", "e", "r", "l")'
# or
perl -wle 'print join "", qw/p e r l/'
# or this
echo perl | perl -wlnaF// -e'print join "", @F'

# or perhaps you meant
perl -wle 'print join "", qw/the perl trinitysezelle@yahoo.com /'
[download]

Cheers,
R.