@a=grep/[^mqsvy]/,a..z,A..Z;
$a{$_}=$_ for@a;
for$i(@a){for(@a){
	$a{$i|$_}||="$i | $_";
	$a{$i^$_}||="$i ^ $_";
}}
for$i(@a){for$j(@a){
	$a{$i^$j^$_}||="$i ^ $_ ^ $j"for@a;
}}
exists$a{chr$_}or die"no $_"for 9,10,32..126;
undef$/;
$_=join'',map{
	$b=qw(| ^)[$a{$_}=~/../?$a{$_}=~/\|/:rand 2];
	$c=qw(^ |)[rand 2];
	"s $b$b $a{$_} ${b}e $c "
}reverse<>=~/./gs;
$_.="s || LZ ^ Ea ^ ad ^ L |eee";
s/((\S *){1,79})( |$)/$1\n/g;
s/ //g;
print;

##</code><code>##

s||a^C|e^s^^n^e^s^^D|X^e^s||r|e^s||e|e^s||k|e^s^^c^e|s||a|e|s^^h^e|s||a^A|e|s^^
l^e^s||r|e|s||e|e^s||P|e|s||a^A|e^s||r|e^s||e|e^s||h|e|s^^t^e^s^^o^e|s||n|e|s||
a|e^s||a^A|e^s||t|e|s^^a|r^e|s||u|e^s||J|e^s||a^C|e|s||t|e^s^^n^e|s||i|e|s^^r^e
^s||p|e|s||LZ^Ea^ad^L|eee