Hi,
also so gefällts mir auch ohne zusammenzählen also:
use strict;
print "Content-type: text/html\n\n";
my $agent = $ENV{'HTTP_USER_AGENT'};
#alle buchstaben raus
$agent =~ s/[^0-9]//g;
Laenge ermitteln
my $anzahl = length($agent);
print "anzahl ist $anzahl<br>\n";
print "<a href="agent2.cgi"> agent </a><br>\n";
exit;
Der zweck der sache ist,
ich möchte den user agent eindeutig erkennen,naja jedenfalls fast eindeutig ;-)
Gruss
Alain