extrem einfaches Script - und trotzdem fehler ...

[Anarchy]

Das ist der Quelltext :

#!c:\perl\bin\perl.exe -w

use strict;
use CGI::Carp qw(fatalsToBrowser);

my @array = ('a', 'b', 'c');

foreach (@array) {
    tr/a-z/A-Z/;
    print;
}

Das steht in der Log :

... [client 127.0.0.1] Premature end of script headers: test.pl

Was mach ich falsch ? Ein so einfaches Script - und das direkt aus nem Tutorial kopiert ...

Danke schonmal ...