Die Warnung wird *vor* dem Header ausgegeben... Du willst in der ersten Anweisung sicherlich eher so etwas: $www = $ENV{SERVER_PORT} and $ENV{'SERVER_PORT'} ne "" ? 1 : 0;