Help for this page
#Perl program ... } }
VOR#000 EQU * MVC A,B move B to A CLC VAR1,VAR2 compare VAR2 != VAR1 BNE COMP EJECT
VOR#000 MVC A,B CLC VAR1,VAR2 BNE COMP EJECT