#!/sw/bin/perl
print int(rand(2)); print "\n";
