#!/usr/bin/perl
#	"J__ __e_ ______l__r_P__e____o_______T__ra_______h___u\n_______ln___";
$M="Jim Bren has pallor Peter from lazy Therapy which flu\nlike walnut.";
($P,$Q)=(1,127773);
sub m{$T=(16807*($P%$Q))-(2836*($P/$Q));($P=($T>0)?$T:$T+2147483647)%$_[0];}
for($i=0;$i<=65;$i++){print($c=substr($M,($n=&m(65)),1));exit if$c eq"\n"&&$n;}