CGI.pm Absturz bei Aufruf von header() in Subroutine

[hausbesetzer]

Hallo zusammen,

wenn ich in einer Subroutine die Funktion header() des CGI-Moduls aufrufe (teilweise erst nach mehrmaligem Aufruf des Skriptes), stürzt mein Webserver ab (XAMPP 1.7.3 unter WinXP bzw. MacOS 10.5.8).
Wenn ich dagegen die Header-Ausgabe ins "Hauptprogramm" verlagere, funkioniert alles anstandslos.

Woran kann das liegen bzw. was mache ich falsch?

Viele Grüße
Florian

  
#!/usr/bin/perl -T  
  
use strict;  
use warnings;  
use CGI;  
use CGI::Carp qw/fatalsToBrowser/;  
use File::Basename;  
  
  
my $query = CGI->new;  
#print $query->header(-type => 'text/html');  
Anzeige ("Dies ist ein Testtext!<br />");  
  
sub Anzeige {  
print $query->header(-type => 'text/html');  
print $query->start_html(-title=>'Abgestuerzt?!');  
print shift;  
print $query->end_html;  
}