Help for this page
Select Code to Download
Select
or
download this
perl -e "use strict; print 1 if (my $x = 1) > (my $y = 0);"