perl -wle'
my $zufallszahl = 23;
if ($zufallszahl != chomp($eingabe = <STDIN>)) {
    print "zufallszahl $zufallszahl ungleich $eingabe";
}'
23
zufallszahl 23 ungleich 23