computer/programs/useless/japh/japh_1

Valid HTML 4.01 Transitional

© Thomas Schoch | home
$_=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