2021-08-05T16:42:59 GwenDragon

Das mit dem die verstehe ich immer noch nicht.

Ich nehme an du willst sowas:

Code: (dl )

1
2
3
4
5
6
7
8

my $s=IO::Socket::INET->new(...) 
or do { 
  print STDERR "Error: Socket error!"; # Fehler Wird ins Serverlog geschrieben

  print $q->redirect('https://example.net/test/err.html'); # erzeugt redirect

  exit; # beendet das programm
};