nicht angemeldet
hi Rolf
hier noch eine möglichkeit
__CODE__
#!perl.exe -w # ich brache keine path :-)
use strict;
use CGI::Carp qw(fatalsToBrowser);
print "Content-type: text/html\n\n";
print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">', "\n";
print "<html><head><title>Testausgabe</title>\n";
print "</head><body>\n";
my $v1=0;
my $v2=0;
my $v3=0;
while($v1==$v2||$v2==$v3||$v1==$v3){
$v1=int(rand(25));
$v2=int(rand(25));
$v3=int(rand(25));
}
print "$v1<br>$v2<br>$v3";
print "</body></html>\n";
__CODE__
ich habe das ganze getestet und es sollte ok sein
bis bis roman
--
P.S. manchmal wundere ich mich schon über die postings (fragen u. antworten) die man hier geboten bekommt(meine eigenen [leider] mit eingenommen)
=> ich denke mir meinen teil und ziehe das beste daraus :-)
P.S. manchmal wundere ich mich schon über die postings (fragen u. antworten) die man hier geboten bekommt(meine eigenen [leider] mit eingenommen)
=> ich denke mir meinen teil und ziehe das beste daraus :-)