Split

[Marcel Georgii]

Oh sry da hats einen Fehler beim kopieren gegeben. Das "/" ist natürlich da!

---------------------------------copy--------------------------------
  open(FILE,"<dynip.txt");
  @raw_data = <FILE>;
  close(FILE);
  chop($raw_data);
  ($ip,$newsec,$newmin,$hr,$mday,$newmon,$newyear) = split(/|/,$raw_data);
  print "Content-Type: text/html\n\n";
  print "<title>Server Status</title>\n";
  print "<font face="arial" size="3">\n";
  print "<table border="0">\n";
  print "<tr><td width="75" align="left"><b>IP:</b></td><td width="125" align="right">$ip</td></tr>\n";
  print "<tr><td width="75" align="left"><b>Time:</b></td><td width="125" align="right">$hr:$newmin:$newsec</td></tr>\n";
  print "<tr><td width="75" align="left"><b>Date:</b></td><td width="125" align="right">$mday.$newmon.$newyear</td></tr>\n";
  print "</table>\n";
  print "</font>";
---------------------------------paste-------------------------------

Irgendwoanders muss der Fehler sein !?!