RETAS-Logo
RETAS-Logo
This page is not mobile friendly.
Better watch on bigger screen.

computer/programs/useless/japh/japh_1

$_=q^#ba':;Dy{rw}<+2~|}+?

+<jwx}@n{<Yn{u<Qjltn{ew+'

;%+.+i0r3>rd]#&<-9+ge^,y;

#ba@]!0>mk%32iv[f^*!7z?<;

$_=q(Thomas Schoch 2005);

;;;;;;; eval,eval ;;;;;;;

This Perl program prints
"Just another Perl Hacker".
(More about JAPHs.)

Download the source.

Explanation